Metrics for b from scale-rotated-ellipse

analyze2.5s (3.5%)

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%	0%	99.8%	0.2%	0%	0%	0%	11
0%	0%	99.8%	0.2%	0%	0%	0%	12

Compiler

Compiled 189 to 57 computations (69.8% saved)

Precisions

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

ival-mult: 600.0ms (33.3% of total)

ival-div: 459.0ms (25.5% of total)

ival-pow: 414.0ms (23% of total)

ival-add: 86.0ms (4.8% of total)

ival-sub: 65.0ms (3.6% of total)

ival-sqrt: 51.0ms (2.8% of total)

ival-neg: 37.0ms (2.1% of total)

ival-sin: 32.0ms (1.8% of total)

ival-cos: 30.0ms (1.7% of total)

ival-pi: 17.0ms (0.9% of total)

const: 8.0ms (0.4% of total)

backward-pass: 2.0ms (0.1% of total)

sample29.9s (42.3%)

Results

13.8s	3995×	3	valid
7.6s	1315×	4	valid
4.6s	2070×	2	valid
1.4s	837×	1	valid
19.0ms	39×	0	valid

Precisions

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

ival-sin: 6.1s (24.3% of total)

ival-cos: 5.1s (20.4% of total)

ival-mult: 3.9s (15.3% of total)

ival-pow: 3.7s (14.5% of total)

ival-div: 2.6s (10.5% of total)

backward-pass: 1.6s (6.2% of total)

ival-add: 701.0ms (2.8% of total)

ival-sqrt: 548.0ms (2.2% of total)

ival-sub: 534.0ms (2.1% of total)

ival-neg: 236.0ms (0.9% of total)

ival-pi: 162.0ms (0.6% of total)

const: 58.0ms (0.2% of total)

Bogosity

preprocess441.0ms (0.6%)

Algorithm

2×	egg-herbie

Rules

8448×	`-lowering-.f32`
8448×	`-lowering-.f64`
2138×	`neg-lowering-neg.f64`
2138×	`neg-lowering-neg.f32`
1690×	`distribute-lft-neg-out`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	556	3888
1	1539	2642
2	7088	2312
0	56	183
1	134	126
2	547	110
3	4869	104
0	8681	104

Stop Event

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

Calls

Call 1

Inputs

(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)))

Outputs

(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)))

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

Call 2

Inputs
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))) (* (* b (neg a)) (* b (neg (neg a))))) (- (+ (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow (neg a) 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))) (* (* (neg b) a) (* (neg b) (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow (neg b) 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ (neg angle) 180) (PI)))) (cos (* (/ (neg angle) 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (neg x-scale)) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (neg y-scale)) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2)))
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))) (* (* b (neg a)) (* b (neg (neg a))))) (- (+ (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow (neg a) 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))))
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))) (* (* (neg b) a) (* (neg b) (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow (neg b) 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))))
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ (neg angle) 180) (PI)))) (cos (* (/ (neg angle) 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))))
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (neg x-scale)) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))))
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (neg y-scale)) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* a b) (* a (neg b)))) (pow (* x-scale y-scale) 2))) (* (* a b) (* a (neg b)))) (- (+ (/ (/ (+ (pow (* b (sin (* (/ angle 180) (PI)))) 2) (pow (* a (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* b (cos (* (/ angle 180) (PI)))) 2) (pow (* a (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* b (sin (* (/ angle 180) (PI)))) 2) (pow (* a (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* b (cos (* (/ angle 180) (PI)))) 2) (pow (* a (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow a 2) (pow b 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* a b) (* a (neg b)))) (pow (* x-scale y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b angle) (* b (neg angle)))) (pow (* x-scale y-scale) 2))) (* (* b angle) (* b (neg angle)))) (- (+ (/ (/ (+ (pow (* angle (sin (* (/ a 180) (PI)))) 2) (pow (* b (cos (* (/ a 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* angle (cos (* (/ a 180) (PI)))) 2) (pow (* b (sin (* (/ a 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* angle (sin (* (/ a 180) (PI)))) 2) (pow (* b (cos (* (/ a 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* angle (cos (* (/ a 180) (PI)))) 2) (pow (* b (sin (* (/ a 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow angle 2))) (sin (* (/ a 180) (PI)))) (cos (* (/ a 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b angle) (* b (neg angle)))) (pow (* x-scale y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b x-scale) (* b (neg x-scale)))) (pow (* a y-scale) 2))) (* (* b x-scale) (* b (neg x-scale)))) (- (+ (/ (/ (+ (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) a) a) (/ (/ (+ (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) a) a) (/ (/ (+ (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow x-scale 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) a) y-scale) 2))))))) (/ (* 4 (* (* b x-scale) (* b (neg x-scale)))) (pow (* a y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b y-scale) (* b (neg y-scale)))) (pow (* x-scale a) 2))) (* (* b y-scale) (* b (neg y-scale)))) (- (+ (/ (/ (+ (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) a) a)) (sqrt (+ (pow (- (/ (/ (+ (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) a) a)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow y-scale 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) a) 2))))))) (/ (* 4 (* (* b y-scale) (* b (neg y-scale)))) (pow (* x-scale a) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* angle a) (* angle (neg a)))) (pow (* x-scale y-scale) 2))) (* (* angle a) (* angle (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ b 180) (PI)))) 2) (pow (* angle (cos (* (/ b 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ b 180) (PI)))) 2) (pow (* angle (sin (* (/ b 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ b 180) (PI)))) 2) (pow (* angle (cos (* (/ b 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ b 180) (PI)))) 2) (pow (* angle (sin (* (/ b 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow angle 2) (pow a 2))) (sin (* (/ b 180) (PI)))) (cos (* (/ b 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* angle a) (* angle (neg a)))) (pow (* x-scale y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* x-scale a) (* x-scale (neg a)))) (pow (* b y-scale) 2))) (* (* x-scale a) (* x-scale (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2)) b) b) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2)) b) b) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow x-scale 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) b) y-scale) 2))))))) (/ (* 4 (* (* x-scale a) (* x-scale (neg a)))) (pow (* b y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* y-scale a) (* y-scale (neg a)))) (pow (* x-scale b) 2))) (* (* y-scale a) (* y-scale (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2)) b) b)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2)) b) b)) 2) (pow (/ (/ (* (* (* 2 (- (pow y-scale 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) b) 2))))))) (/ (* 4 (* (* y-scale a) (* y-scale (neg a)))) (pow (* x-scale b) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* angle y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ x-scale 180) (PI)))) 2) (pow (* b (cos (* (/ x-scale 180) (PI)))) 2)) angle) angle) (/ (/ (+ (pow (* a (cos (* (/ x-scale 180) (PI)))) 2) (pow (* b (sin (* (/ x-scale 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ x-scale 180) (PI)))) 2) (pow (* b (cos (* (/ x-scale 180) (PI)))) 2)) angle) angle) (/ (/ (+ (pow (* a (cos (* (/ x-scale 180) (PI)))) 2) (pow (* b (sin (* (/ x-scale 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ x-scale 180) (PI)))) (cos (* (/ x-scale 180) (PI)))) angle) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* angle y-scale) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale angle) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ y-scale 180) (PI)))) 2) (pow (* b (cos (* (/ y-scale 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ y-scale 180) (PI)))) 2) (pow (* b (sin (* (/ y-scale 180) (PI)))) 2)) angle) angle)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ y-scale 180) (PI)))) 2) (pow (* b (cos (* (/ y-scale 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ y-scale 180) (PI)))) 2) (pow (* b (sin (* (/ y-scale 180) (PI)))) 2)) angle) angle)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ y-scale 180) (PI)))) (cos (* (/ y-scale 180) (PI)))) x-scale) angle) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale angle) 2)))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* y-scale x-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) y-scale) x-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* y-scale x-scale) 2)))

Outputs
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (sind angle) (cosd angle)) (* x-scale y-scale)))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))) (* (* b (neg a)) (* b (neg (neg a))))) (- (+ (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow (neg a) 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2)))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (sind angle) (cosd angle)) (* x-scale y-scale)))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))) (* (* (neg b) a) (* (neg b) (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow (neg b) 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2)))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (sind angle) (cosd angle)) (* x-scale y-scale)))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ (neg angle) 180) (PI)))) (cos (* (/ (neg angle) 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (- (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (cosd angle) (neg (sind angle))) (* x-scale y-scale)))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (neg x-scale)) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2)))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (sind angle) (cosd angle)) (* x-scale y-scale)))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (neg y-scale)) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2)))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (sind angle) (cosd angle)) (* x-scale y-scale)))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale)))))
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))) (* (* b (neg a)) (* b (neg (neg a))))) (- (+ (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow (neg a) 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (sind angle) (cosd angle)) (* x-scale y-scale)))))))) (* (neg (square (* b a))) (/ 4 (square (* x-scale y-scale)))))
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))) (* (* (neg b) a) (* (neg b) (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow (neg b) 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (sind angle) (cosd angle)) (* x-scale y-scale)))))))) (* (neg (square (* b a))) (/ 4 (square (* x-scale y-scale)))))
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ (neg angle) 180) (PI)))) (cos (* (/ (neg angle) 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (- (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (cosd angle) (neg (sind angle))) (* x-scale y-scale)))))))) (* (neg (square (* b a))) (/ 4 (square (* x-scale y-scale)))))
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (neg x-scale)) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (sind angle) (cosd angle)) (* x-scale y-scale)))))))) (* (neg (square (* b a))) (/ 4 (square (* x-scale y-scale)))))
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (neg y-scale)) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale)) (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square y-scale))) (* (* 2 (fmsub b b (square a))) (/ (* (sind angle) (cosd angle)) (* x-scale y-scale)))))))) (* (neg (square (* b a))) (/ 4 (square (* x-scale y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* a b) (* a (neg b)))) (pow (* x-scale y-scale) 2))) (* (* a b) (* a (neg b)))) (- (+ (/ (/ (+ (pow (* b (sin (* (/ angle 180) (PI)))) 2) (pow (* a (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* b (cos (* (/ angle 180) (PI)))) 2) (pow (* a (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* b (sin (* (/ angle 180) (PI)))) 2) (pow (* a (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* b (cos (* (/ angle 180) (PI)))) 2) (pow (* a (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow a 2) (pow b 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* a b) (* a (neg b)))) (pow (* x-scale y-scale) 2)))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square y-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square x-scale))) (hypot (- (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square x-scale)) (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square y-scale))) (* (* (fmsub a a (square b)) (* 2 (sind angle))) (/ (/ (cosd angle) x-scale) y-scale)))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b angle) (* b (neg angle)))) (pow (* x-scale y-scale) 2))) (* (* b angle) (* b (neg angle)))) (- (+ (/ (/ (+ (pow (* angle (sin (* (/ a 180) (PI)))) 2) (pow (* b (cos (* (/ a 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* angle (cos (* (/ a 180) (PI)))) 2) (pow (* b (sin (* (/ a 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* angle (sin (* (/ a 180) (PI)))) 2) (pow (* b (cos (* (/ a 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* angle (cos (* (/ a 180) (PI)))) 2) (pow (* b (sin (* (/ a 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow angle 2))) (sin (* (/ a 180) (PI)))) (cos (* (/ a 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b angle) (* b (neg angle)))) (pow (* x-scale y-scale) 2)))
(* -1/4 (/ (sqrt (* (/ (* (neg (square (* b angle))) (* 8 (neg (square (* b angle))))) (square (* x-scale y-scale))) (- (+ (/ (+ (square (* angle (sind a))) (square (* b (cosd a)))) (square x-scale)) (/ (+ (square (* angle (cosd a))) (square (* b (sind a)))) (square y-scale))) (hypot (- (/ (+ (square (* angle (sind a))) (square (* b (cosd a)))) (square x-scale)) (/ (+ (square (* angle (cosd a))) (square (* b (sind a)))) (square y-scale))) (* (* 2 (fmsub b b (square angle))) (/ (* (sind a) (cosd a)) (* x-scale y-scale))))))) (/ (neg (square (* b angle))) (square (* x-scale y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b x-scale) (* b (neg x-scale)))) (pow (* a y-scale) 2))) (* (* b x-scale) (* b (neg x-scale)))) (- (+ (/ (/ (+ (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) a) a) (/ (/ (+ (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) a) a) (/ (/ (+ (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow x-scale 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) a) y-scale) 2))))))) (/ (* 4 (* (* b x-scale) (* b (neg x-scale)))) (pow (* a y-scale) 2)))
(* -1/4 (/ (sqrt (* (* 8 (/ (neg (square (* b x-scale))) (square (* a y-scale)))) (* (neg (square (* b x-scale))) (- (+ (/ (+ (square (* b (cosd angle))) (square (* x-scale (sind angle)))) (square a)) (/ (+ (square (* b (sind angle))) (square (* x-scale (cosd angle)))) (square y-scale))) (hypot (- (/ (+ (square (* b (cosd angle))) (square (* x-scale (sind angle)))) (square a)) (/ (+ (square (* b (sind angle))) (square (* x-scale (cosd angle)))) (square y-scale))) (* (cosd angle) (/ (* (sind angle) (* 2 (fmsub b b (square x-scale)))) (* a y-scale)))))))) (/ (neg (square (* b x-scale))) (square (* a y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b y-scale) (* b (neg y-scale)))) (pow (* x-scale a) 2))) (* (* b y-scale) (* b (neg y-scale)))) (- (+ (/ (/ (+ (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) a) a)) (sqrt (+ (pow (- (/ (/ (+ (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) a) a)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow y-scale 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) a) 2))))))) (/ (* 4 (* (* b y-scale) (* b (neg y-scale)))) (pow (* x-scale a) 2)))
(* -1/4 (/ (sqrt (* (/ (* (neg (square (* b y-scale))) (* 8 (neg (square (* b y-scale))))) (square (* a x-scale))) (- (+ (/ (+ (square (* b (cosd angle))) (square (* y-scale (sind angle)))) (square x-scale)) (/ (+ (square (* b (sind angle))) (square (* y-scale (cosd angle)))) (square a))) (hypot (- (/ (+ (square (* b (cosd angle))) (square (* y-scale (sind angle)))) (square x-scale)) (/ (+ (square (* b (sind angle))) (square (* y-scale (cosd angle)))) (square a))) (* (* 2 (fmsub b b (square y-scale))) (/ (* (sind angle) (cosd angle)) (* a x-scale))))))) (/ (neg (square (* b y-scale))) (square (* a x-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* angle a) (* angle (neg a)))) (pow (* x-scale y-scale) 2))) (* (* angle a) (* angle (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ b 180) (PI)))) 2) (pow (* angle (cos (* (/ b 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ b 180) (PI)))) 2) (pow (* angle (sin (* (/ b 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ b 180) (PI)))) 2) (pow (* angle (cos (* (/ b 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ b 180) (PI)))) 2) (pow (* angle (sin (* (/ b 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow angle 2) (pow a 2))) (sin (* (/ b 180) (PI)))) (cos (* (/ b 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* angle a) (* angle (neg a)))) (pow (* x-scale y-scale) 2)))
(* -1/4 (/ (sqrt (* (* (neg (square (* a angle))) (* 8 (/ (neg (square (* a angle))) (square (* x-scale y-scale))))) (- (+ (/ (+ (square (* a (sind b))) (square (* angle (cosd b)))) (square x-scale)) (/ (+ (square (* a (cosd b))) (square (* angle (sind b)))) (square y-scale))) (hypot (- (/ (+ (square (* a (sind b))) (square (* angle (cosd b)))) (square x-scale)) (/ (+ (square (* a (cosd b))) (square (* angle (sind b)))) (square y-scale))) (* (* (- (square angle) (square a)) (* 2 (sind b))) (/ (cosd b) (* x-scale y-scale))))))) (/ (neg (square (* a angle))) (square (* x-scale y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* x-scale a) (* x-scale (neg a)))) (pow (* b y-scale) 2))) (* (* x-scale a) (* x-scale (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2)) b) b) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2)) b) b) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow x-scale 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) b) y-scale) 2))))))) (/ (* 4 (* (* x-scale a) (* x-scale (neg a)))) (pow (* b y-scale) 2)))
(* -1/4 (/ (sqrt (* (* (neg (square (* a x-scale))) (* 8 (/ (neg (square (* a x-scale))) (square (* b y-scale))))) (+ (/ (+ (square (* a (cosd angle))) (square (* x-scale (sind angle)))) (square y-scale)) (- (/ (+ (square (* a (sind angle))) (square (* x-scale (cosd angle)))) (square b)) (hypot (- (/ (+ (square (* a (sind angle))) (square (* x-scale (cosd angle)))) (square b)) (/ (+ (square (* a (cosd angle))) (square (* x-scale (sind angle)))) (square y-scale))) (* (* (- (square x-scale) (square a)) (* 2 (sind angle))) (/ (/ (cosd angle) b) y-scale))))))) (/ (neg (square (* a x-scale))) (square (* b y-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* y-scale a) (* y-scale (neg a)))) (pow (* x-scale b) 2))) (* (* y-scale a) (* y-scale (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2)) b) b)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2)) b) b)) 2) (pow (/ (/ (* (* (* 2 (- (pow y-scale 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) b) 2))))))) (/ (* 4 (* (* y-scale a) (* y-scale (neg a)))) (pow (* x-scale b) 2)))
(* -1/4 (/ (sqrt (* (* (neg (square (* a y-scale))) (* 8 (/ (neg (square (* a y-scale))) (square (* b x-scale))))) (- (+ (/ (+ (square (* a (sind angle))) (square (* y-scale (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* y-scale (sind angle)))) (square b))) (hypot (- (/ (+ (square (* a (sind angle))) (square (* y-scale (cosd angle)))) (square x-scale)) (/ (+ (square (* a (cosd angle))) (square (* y-scale (sind angle)))) (square b))) (* (cosd angle) (/ (* (sind angle) (* 2 (fmsub y-scale y-scale (square a)))) (* b x-scale))))))) (/ (neg (square (* a y-scale))) (square (* b x-scale)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* angle y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ x-scale 180) (PI)))) 2) (pow (* b (cos (* (/ x-scale 180) (PI)))) 2)) angle) angle) (/ (/ (+ (pow (* a (cos (* (/ x-scale 180) (PI)))) 2) (pow (* b (sin (* (/ x-scale 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ x-scale 180) (PI)))) 2) (pow (* b (cos (* (/ x-scale 180) (PI)))) 2)) angle) angle) (/ (/ (+ (pow (* a (cos (* (/ x-scale 180) (PI)))) 2) (pow (* b (sin (* (/ x-scale 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ x-scale 180) (PI)))) (cos (* (/ x-scale 180) (PI)))) angle) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* angle y-scale) 2)))
(* -1/4 (/ (sqrt (* (* (neg (square (* b a))) (* 8 (/ (neg (square (* b a))) (square (* y-scale angle))))) (+ (/ (+ (square (* a (sind x-scale))) (square (* b (cosd x-scale)))) (square angle)) (- (/ (+ (square (* a (cosd x-scale))) (square (* b (sind x-scale)))) (square y-scale)) (hypot (- (/ (+ (square (* a (sind x-scale))) (square (* b (cosd x-scale)))) (square angle)) (/ (+ (square (* a (cosd x-scale))) (square (* b (sind x-scale)))) (square y-scale))) (* (cosd x-scale) (/ (* (* (sind x-scale) 2) (fmsub b b (square a))) (* y-scale angle)))))))) (/ (neg (square (* b a))) (square (* y-scale angle)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale angle) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ y-scale 180) (PI)))) 2) (pow (* b (cos (* (/ y-scale 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ y-scale 180) (PI)))) 2) (pow (* b (sin (* (/ y-scale 180) (PI)))) 2)) angle) angle)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ y-scale 180) (PI)))) 2) (pow (* b (cos (* (/ y-scale 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ y-scale 180) (PI)))) 2) (pow (* b (sin (* (/ y-scale 180) (PI)))) 2)) angle) angle)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ y-scale 180) (PI)))) (cos (* (/ y-scale 180) (PI)))) x-scale) angle) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale angle) 2)))
(* -1/4 (/ (sqrt (* (* (neg (square (* b a))) (* 8 (/ (neg (square (* b a))) (square (* x-scale angle))))) (+ (/ (+ (square (* a (sind y-scale))) (square (* b (cosd y-scale)))) (square x-scale)) (- (/ (+ (square (* a (cosd y-scale))) (square (* b (sind y-scale)))) (square angle)) (hypot (- (/ (+ (square (* a (sind y-scale))) (square (* b (cosd y-scale)))) (square x-scale)) (/ (+ (square (* a (cosd y-scale))) (square (* b (sind y-scale)))) (square angle))) (* (* (fmsub b b (square a)) (* 2 (sind y-scale))) (/ (/ (cosd y-scale) x-scale) angle))))))) (/ (neg (square (* b a))) (square (* x-scale angle)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* y-scale x-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) y-scale) x-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* y-scale x-scale) 2)))
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square y-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square x-scale))) (hypot (* (* 2 (fmsub b b (square a))) (/ (* (sind angle) (cosd angle)) (* x-scale y-scale))) (- (/ (+ (square (* a (sind angle))) (square (* b (cosd angle)))) (square y-scale)) (/ (+ (square (* a (cosd angle))) (square (* b (sind angle)))) (square x-scale))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale)))))

Symmetry

(abs a)

(abs b)

(abs x-scale)

(abs y-scale)

explain3.0s (4.2%)

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
180	0	-	0	-	(-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))
157	0	-	1	(1.157981697677102e-49 9.273455888019975e+85 -1.008706629094936e-55 3.344549893229633e-68 2.247736953672594e+206)	(/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) #s(literal 2 binary64)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
118	0	-	0	-	`(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))`
118	0	-	0	-	`(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))`
68	0	-	2	(1.1961779679232647e-308 9.678661216583029e+145 3.91288189258272e+231 4.46645747220785e-187 7.534623402329175e+37)	`(/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))`
51	0	-	0	-	(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
39	0	-	1	(6.967137424044425e-255 9.522336388476218e-234 1.3151311751110396e-221 4.896277423738019e-156 1.351043257777431e+243)	(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))
38	1	(2.8781781674060988e-186 3.2912284633005014e-25 8.378362745393088e-238 5.68127331112871e-198 7.13674618195185e-43)	1	(4.148127802585028e-149 2.899277732337201e+155 -867826941167.515 2.2769434647758714e+26 5.358282273772007e-29)	(sqrt.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) #s(literal 2 binary64)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))
36	0	-	2	(2.123951069634179e-210 2.668743278675368e-156 9.717232369861345e+226 2.4501660137732883e-151 1.6945250868344337e+141)	`(/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)`
35	0	-	1	(2.123951069634179e-210 2.668743278675368e-156 9.717232369861345e+226 2.4501660137732883e-151 1.6945250868344337e+141)	`(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)`
33	0	-	0	-	(.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) #s(literal 2 binary64)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))
29	0	-	0	-	`(.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))`
28	0	-	1	(1.2132837817456401e-161 7.678358378597351e-268 0.09377556608378164 1.7637936226833113e-112 1.1039973474754873e-286)	`(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)`
23	0	-	1	(8.348784273393446e-305 8.272976508517275e+143 1.083540187085505e+114 2.9726896316588877e-150 1.9249409679357012e-95)	`(.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) #s(literal 2 binary64)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a))))`
22	0	-	1	(2.070986450560376e-131 7.912218179358994e-199 6.362923589290823e+289 4.872380860093264e+50 2.4809111870122246e-278)	`(/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.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	0	-	0	-	`(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))`
15	0	-	0	-	`(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)`
11	0	-	1	(6.967137424044425e-255 9.522336388476218e-234 1.3151311751110396e-221 4.896277423738019e-156 1.351043257777431e+243)	`(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)`
0	1	(1.1961779679232647e-308 9.678661216583029e+145 3.91288189258272e+231 4.46645747220785e-187 7.534623402329175e+37)	0	-	`(.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a))))`
0	0	-	0	-	`y-scale`
0	0	-	0	-	`#s(literal 4 binary64)`
0	35	(6.408814207069229e-269 1.592577561784001e+33 1.1309356947041476e-121 4.6256174137146826e-5 6.010696508414095e+73)	0	-	`(pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))`
0	0	-	0	-	`(/.f64 angle #s(literal 180 binary64))`
0	0	-	0	-	`(+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))`
0	0	-	0	-	`(PI.f64)`
0	87	(5.367177892020938e-146 2.9415355611017865e-68 -8.52097758439925e-159 1.6977131915954464e-195 3.8558118255230845e-92)	0	-	`(pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))`
0	0	-	0	-	`(pow.f64 a #s(literal 2 binary64))`
0	83	(2.3114555101713204e-306 3.869171901358157e-128 -6.433406010923669e-278 5.102378938789872e-139 1.6607707113130136e-108)	0	-	`(pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))`
0	0	-	0	-	`(.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) #s(literal 2 binary64))))`
0	0	-	0	-	(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))
0	0	-	0	-	`a`
0	0	-	0	-	`b`
0	0	-	0	-	`(.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))`
0	20	(2.3114555101713204e-306 3.869171901358157e-128 -6.433406010923669e-278 5.102378938789872e-139 1.6607707113130136e-108)	0	-	(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
0	0	-	0	-	`#s(literal 2 binary64)`
0	0	-	0	-	`angle`
0	0	-	0	-	`#s(literal 180 binary64)`
0	0	-	0	-	`(.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))`
0	0	-	0	-	(+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
0	0	-	0	-	`(.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))`
0	0	-	0	-	`(+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))`
0	0	-	0	-	`(neg.f64 a)`
0	0	-	0	-	`(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))`
0	0	-	0	-	`(.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))`
0	0	-	0	-	`(pow.f64 b #s(literal 2 binary64))`
0	0	-	0	-	`(*.f64 b (neg.f64 a))`
0	90	(5.337093534391391e+92 4.4067673209368856e+195 -2.680005014657648e+54 1.5228888747386252e+237 7.93329316542339e-183)	0	-	`(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))`
0	0	-	0	-	`(*.f64 x-scale y-scale)`
0	0	-	0	-	`(.f64 (.f64 b a) (*.f64 b (neg.f64 a)))`
0	0	-	0	-	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
0	0	-	0	-	(neg.f64 (sqrt.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) #s(literal 2 binary64)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))))
0	0	-	0	-	`(.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))`
0	56	(6.408814207069229e-269 1.592577561784001e+33 1.1309356947041476e-121 4.6256174137146826e-5 6.010696508414095e+73)	0	-	`(pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))`
0	58	(5.337093534391391e+92 4.4067673209368856e+195 -2.680005014657648e+54 1.5228888747386252e+237 7.93329316542339e-183)	0	-	`(pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))`
0	0	-	0	-	`(*.f64 b a)`
0	0	-	0	-	`x-scale`

Results

1.2s	228×	3	valid
741.0ms	98×	4	valid
350.0ms	128×	2	valid
135.0ms	58×	1	valid

Compiler

Compiled 3426 to 170 computations (95% saved)

Precisions

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

ival-sin: 414.0ms (24.1% of total)

ival-cos: 334.0ms (19.5% of total)

ival-pow: 311.0ms (18.1% of total)

ival-mult: 192.0ms (11.2% of total)

backward-pass: 183.0ms (10.7% of total)

ival-div: 140.0ms (8.2% of total)

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

ival-add: 42.0ms (2.4% of total)

ival-sub: 29.0ms (1.7% of total)

ival-neg: 14.0ms (0.8% of total)

ival-pi: 8.0ms (0.5% of total)

const: 4.0ms (0.2% of total)

eval1.0ms (0%)

Compiler: Compiled 181 to 57 computations (68.5% saved)

prune1.0ms (0%)

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

0.1%

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

Compiler

Compiled 181 to 57 computations (68.5% saved)

simplify593.0ms (0.8%)

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Program
✓	cost-diff	(.f64 (.f64 b a) (.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (.f64 (/.f64 (/.f64 (.f64 b a) x-scale) y-scale) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))
✓	cost-diff	(.f64 (.f64 (.f64 b a) (.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (.f64 (/.f64 (/.f64 (.f64 b a) x-scale) y-scale) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64))) (.f64 (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 #s(literal 2 binary64) x-scale))) y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))
✓	cost-diff	(sqrt.f64 (.f64 (.f64 (.f64 b a) (.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (.f64 (/.f64 (/.f64 (.f64 b a) x-scale) y-scale) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64))) (.f64 (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 #s(literal 2 binary64) x-scale))) y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
✓	cost-diff	(/.f64 (sqrt.f64 (.f64 (.f64 (.f64 b a) (.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (.f64 (/.f64 (/.f64 (.f64 b a) x-scale) y-scale) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64))) (.f64 (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 #s(literal 2 binary64) x-scale))) y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (.f64 b (.f64 #s(literal 4 binary64) (.f64 b a))) a) (.f64 x-scale (.f64 y-scale (*.f64 x-scale y-scale)))))

Rules

6716×	`-lowering-.f32`
6716×	`-lowering-.f64`
1656×	`/-lowering-/.f32`
1656×	`/-lowering-/.f64`
1294×	`associate-r`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	60	949
1	166	796
2	612	775
3	4149	759
4	5946	759
0	8201	759

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* (* b (* 4 (* b a))) a) (* x-scale (* y-scale (* x-scale y-scale)))))
(sqrt (* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale))))))
(* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))
(* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale))))
(* b a)
b
a
(* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))
(* (* b a) 8)
8
(* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale))
(/ (/ (* b a) x-scale) y-scale)
(/ (* b a) x-scale)
x-scale
y-scale
(- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale))))
(/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))
(+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2))
(pow (* a (cos (/ (* angle (PI)) 180))) 2)
(* a (cos (/ (* angle (PI)) 180)))
(cos (/ (* angle (PI)) 180))
(/ (* angle (PI)) 180)
(* angle (PI))
angle
(PI)
180
2
(pow (* b (sin (/ (* angle (PI)) 180))) 2)
(* b (sin (/ (* angle (PI)) 180)))
(sin (/ (* angle (PI)) 180))
(* y-scale y-scale)
(- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))
(sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale))))
(- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))
(/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale))
(+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2))
(pow (* a (sin (/ (* angle (PI)) 180))) 2)
(* a (sin (/ (* angle (PI)) 180)))
(pow (* b (cos (/ (* angle (PI)) 180))) 2)
(* b (cos (/ (* angle (PI)) 180)))
(* x-scale x-scale)
(/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)
(* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale)))
(* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))
(* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a)))
(- (* b b) (* a a))
(* b b)
(* a a)
(/ 2 x-scale)
(/ (* (* b (* 4 (* b a))) a) (* x-scale (* y-scale (* x-scale y-scale))))
(* (* b (* 4 (* b a))) a)
(* b (* 4 (* b a)))
(* 4 (* b a))
4
(* x-scale (* y-scale (* x-scale y-scale)))
(* y-scale (* x-scale y-scale))
(* x-scale y-scale)

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

localize2.7s (3.9%)

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(sqrt.f64 (.f64 (.f64 (.f64 b a) (.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (.f64 (/.f64 (/.f64 (.f64 b a) x-scale) y-scale) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64))) (.f64 (.f64 (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 (.f64 b b) (.f64 a a))) (/.f64 #s(literal 2 binary64) x-scale))) y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (/.f64 (.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
✓	accuracy	100.0%	(sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
✓	accuracy	100.0%	(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
✓	accuracy	3.1%	(PI.f64)

Results

2.5s

256×

exit

Compiler

Compiled 1297 to 58 computations (95.5% saved)

Precisions

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

ival-sin: 498.0ms (25.4% of total)

backward-pass: 455.0ms (23.2% of total)

ival-cos: 388.0ms (19.8% of total)

ival-mult: 251.0ms (12.8% of total)

ival-div: 128.0ms (6.5% of total)

ival-pow: 115.0ms (5.9% of total)

ival-sub: 43.0ms (2.2% of total)

compiled-spec: 37.0ms (1.9% of total)

ival-add: 19.0ms (1% of total)

ival-sqrt: 17.0ms (0.9% of total)

ival-pi: 9.0ms (0.5% of total)

const: 3.0ms (0.2% of total)

series549.0ms (0.8%)

Counts

7 → 252

Calls

Call 1

Inputs
#<alt (/ (sqrt (* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* (* b (* 4 (* b a))) a) (* x-scale (* y-scale (* x-scale y-scale)))))>
#<alt (sqrt (* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale))))))>
#<alt (* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))>
#<alt (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale))))>
#<alt (PI)>
#<alt (cos (/ (* angle (PI)) 180))>
#<alt (sin (/ (* angle (PI)) 180))>

Outputs
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))>
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))>
#<alt (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))>
#<alt (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))>
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))>
#<alt (* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))>
#<alt (* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))>
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))>
#<alt (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))>
#<alt (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))>
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))>
#<alt (* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))>
#<alt (* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))>
#<alt (* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))>
#<alt (* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))>
#<alt (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))>
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))>
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))>
#<alt (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))>
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))>
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))>
#<alt (* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))>
#<alt (* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))>
#<alt (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))>
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))>
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))>
#<alt (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))>
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))>
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))))>
#<alt (+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))>
#<alt (+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))>
#<alt (* (pow b 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))>
#<alt (* (pow b 2) (+ (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))>
#<alt (* (pow b 2) (+ (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))>
#<alt (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))>
#<alt (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))>
#<alt (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))>
#<alt (* -1 (* (/ (* (pow a 2) (* (pow b 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* -1 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))>
#<alt (* -1 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))>
#<alt (* -1 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))>
#<alt (* (pow a 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))>
#<alt (* (pow a 2) (+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))>
#<alt (* (pow a 2) (+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))>
#<alt (* (/ (* (pow a 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))>
#<alt (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))>
#<alt (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))>
#<alt (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))>
#<alt (* -1 (* (/ (* (pow a 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* -1 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))>
#<alt (* -1 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))>
#<alt (* -1 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))>
#<alt (/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) x-scale)>
#<alt (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))) y-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) x-scale)>
#<alt (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow x-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) y-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))) y-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))) x-scale)>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))>
#<alt (/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))>
#<alt (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))>
#<alt (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))>
#<alt (/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))>
#<alt (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))>
#<alt (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))>
#<alt (/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* x-scale (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) y-scale)>
#<alt (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))) x-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* x-scale (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) y-scale)>
#<alt (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* x-scale (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow y-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) x-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))) x-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))) y-scale)>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))>
#<alt (/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 2))>
#<alt (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (pow y-scale 2))>
#<alt (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (pow y-scale 2))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))>
#<alt (/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 2))>
#<alt (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (pow y-scale 2))>
#<alt (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (pow y-scale 2))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow b 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* x-scale (sqrt 2)))) (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2))))>
#<alt (+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow b 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* a (* (pow b 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* x-scale (sqrt 2)))))) (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2))))>
#<alt (+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow b 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* x-scale (sqrt 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* a (* (pow b 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* x-scale (sqrt 2)))))))) (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (* (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))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -4 (* (/ (* (pow a 4) (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))>
#<alt (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 2 (* (/ (* (pow a 4) (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 6) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* (pow b 6) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))>
#<alt (* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow a 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow b 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 6) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* (pow b 6) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))>
#<alt (* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow a 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow b 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* (pow a 4) (+ (* 8 (/ (* (pow a 2) (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* (pow a 4) (+ (* 8 (/ (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -4 (* (/ (* (pow a 2) (* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))>
#<alt (* (pow a 4) (+ (* 8 (/ (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 2 (* (/ (* (pow a 2) (* (pow b 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))))>
#<alt (* 8 (/ (* (pow a 6) (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* (pow a 6) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))>
#<alt (* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow b 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow a 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))>
#<alt (* 8 (/ (* (pow a 6) (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* (pow a 6) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))>
#<alt (* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow b 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow a 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow y-scale 2)))) (pow x-scale 2))>
#<alt (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* (pow y-scale 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))))))) (pow x-scale 2))>
#<alt (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow y-scale 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) (pow y-scale 2))))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))) (pow x-scale 4))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))))) (pow x-scale 4))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))))) (pow x-scale 4))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) (pow y-scale 2))))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))) (pow x-scale 4))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))))) (pow x-scale 4))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))))) (pow x-scale 4))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2)))) (pow y-scale 2))>
#<alt (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* (pow x-scale 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))))) (pow y-scale 2))>
#<alt (/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow x-scale 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow 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))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 4))))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))) (pow y-scale 4))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2))))) (pow y-scale 4))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))))) (pow y-scale 4))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 4))))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))) (pow y-scale 4))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2))))) (pow y-scale 4))>
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))))) (pow y-scale 4))>
#<alt (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))>
#<alt (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))>
#<alt (+ (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))>
#<alt (+ (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt (* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))>
#<alt 1>
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))>
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))>
#<alt (+ 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)))))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (* 1/180 (* angle (PI)))>
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))>
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))>
#<alt (* 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))))))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>

Calls

63 calls:

Time	Variable		Point	Expression
76.0ms	x-scale	@	inf	(* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))
47.0ms	b	@	inf	(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* (* b (* 4 (* b a))) a) (* x-scale (* y-scale (* x-scale y-scale)))))
26.0ms	y-scale	@	0	(* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale))))
21.0ms	x-scale	@	0	(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* (* b (* 4 (* b a))) a) (* x-scale (* y-scale (* x-scale y-scale)))))
21.0ms	angle	@	inf	(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* (* b (* 4 (* b a))) a) (* x-scale (* y-scale (* x-scale y-scale)))))

rewrite409.0ms (0.6%)

Algorithm

1×	batch-egg-rewrite

Rules

4562×	`-lowering-.f32`
4562×	`-lowering-.f64`
3640×	`/-lowering-/.f32`
3640×	`/-lowering-/.f64`
1036×	`frac-2neg`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	60	387
1	293	327
2	1915	315
0	8588	315

Stop Event

1×	iter limit
1×	node limit

Counts

7 → 176

Calls

Call 1

Inputs
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* (* b (* 4 (* b a))) a) (* x-scale (* y-scale (* x-scale y-scale)))))
(sqrt (* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale))))))
(* (* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale)))) (- (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) (- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale)))) (* (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale) (/ (* (cos (/ (* angle (PI)) 180)) (* (* (sin (/ (* angle (PI)) 180)) (- (* b b) (* a a))) (/ 2 x-scale))) y-scale)))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))
(* (* b a) (* (* (* b a) 8) (* (/ (/ (* b a) x-scale) y-scale) (/ (/ (* b a) x-scale) y-scale))))
(PI)
(cos (/ (* angle (PI)) 180))
(sin (/ (* angle (PI)) 180))

Outputs
(exp.f64 (.f64 (log.f64 (.f64 (/.f64 (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale) (/.f64 (.f64 x-scale (.f64 y-scale y-scale)) a)) (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b))) (.f64 x-scale (.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))))) (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))))))
(neg.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b))) (.f64 x-scale (.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale) (/.f64 (.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))) (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale) (/.f64 (.f64 x-scale (.f64 y-scale y-scale)) a)) (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (.f64 (/.f64 (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 a (.f64 x-scale (.f64 y-scale y-scale))) x-scale) (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 b (.f64 (*.f64 b a) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 a (.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (.f64 b (.f64 (*.f64 b a) #s(literal 4 binary64))) x-scale))))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))) (/.f64 (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b))) (.f64 x-scale (.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (.f64 x-scale (.f64 y-scale y-scale))))
(/.f64 #s(literal -1 binary64) (.f64 (/.f64 (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64))))
(/.f64 (.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))))
(/.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))) (/.f64 (/.f64 a (.f64 x-scale (*.f64 y-scale y-scale))) x-scale))
(/.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale)) (/.f64 a (.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))))) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (.f64 x-scale (.f64 y-scale y-scale)))))
(/.f64 (neg.f64 (.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))))) (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b))))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 a (.f64 x-scale (*.f64 y-scale y-scale))) x-scale)))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale))) (-.f64 #s(literal 0 binary64) (/.f64 a (.f64 x-scale (*.f64 y-scale y-scale)))))
(pow.f64 (.f64 (/.f64 (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale) (/.f64 (.f64 x-scale (.f64 y-scale y-scale)) a)) (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64))) #s(literal -1 binary64))
(.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (.f64 x-scale (.f64 y-scale y-scale)) (/.f64 a (/.f64 x-scale (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))))))
(.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))))
(.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale) (/.f64 (.f64 x-scale (.f64 y-scale y-scale)) a))))
(.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))) (.f64 (-.f64 #s(literal 0 binary64) x-scale) (/.f64 (.f64 x-scale (.f64 y-scale y-scale)) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))))))
(.f64 (/.f64 (.f64 x-scale (.f64 y-scale y-scale)) (/.f64 a (/.f64 x-scale (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))))) (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))))
(.f64 (/.f64 (.f64 x-scale (.f64 y-scale y-scale)) (/.f64 a (/.f64 x-scale (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))))) (pow.f64 (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))))
(.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))))))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64)))))
(.f64 (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale) (/.f64 (.f64 x-scale (*.f64 y-scale y-scale)) a))))
(.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))) (/.f64 (/.f64 a (.f64 x-scale (*.f64 y-scale y-scale))) x-scale)))
(.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))) (.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))))
(.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale)) (/.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))) (/.f64 a (.f64 x-scale (*.f64 y-scale y-scale)))))
(.f64 (/.f64 x-scale (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))) (pow.f64 (.f64 (/.f64 a (.f64 x-scale (.f64 y-scale y-scale))) (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal -1 binary64) (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b)))) (pow.f64 (.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (.f64 x-scale (.f64 y-scale y-scale))) (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))) x-scale) (.f64 x-scale (.f64 y-scale y-scale)))
(.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))) (.f64 x-scale y-scale)) (.f64 x-scale y-scale))
(.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))) (.f64 x-scale (.f64 y-scale y-scale))) x-scale)
(.f64 (.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (/.f64 #s(literal -1 binary64) (.f64 a (.f64 #s(literal -4 binary64) (.f64 (*.f64 b a) b)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))) (pow.f64 (.f64 (/.f64 (/.f64 a (.f64 x-scale (.f64 y-scale y-scale))) x-scale) (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))) (/.f64 (.f64 x-scale (.f64 x-scale (*.f64 y-scale y-scale))) a))
(.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale)) (/.f64 (.f64 x-scale (.f64 y-scale y-scale)) a))
(.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 #s(literal -4 binary64) (.f64 (.f64 b a) b)))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (.f64 x-scale (.f64 y-scale y-scale)))))
(.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (/.f64 a (/.f64 x-scale (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 y-scale y-scale)))
(.f64 (pow.f64 (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 (/.f64 a (.f64 x-scale (.f64 y-scale y-scale))) x-scale) (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (*.f64 x-scale x-scale)))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))) (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (/.f64 (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))) x-scale) (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 a (.f64 x-scale (.f64 y-scale y-scale))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (*.f64 x-scale x-scale)))))) #s(literal -1 binary64)))
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))))
(sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))
(neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))))
(/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale)))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale)))))
(.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))))))
(.f64 (pow.f64 (.f64 b a) #s(literal 1/2 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 b a) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))))
(.f64 (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))))
(.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 b) (pow.f64 (.f64 a (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 b) (pow.f64 (.f64 (.f64 (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))) (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (*.f64 x-scale x-scale))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 b) (sqrt.f64 (.f64 a (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))))))
(.f64 (sqrt.f64 b) (sqrt.f64 (.f64 (.f64 (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))) (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (*.f64 x-scale x-scale)))))))
(.f64 (pow.f64 a #s(literal 1/2 binary64)) (pow.f64 (.f64 b (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale)))) (pow.f64 (.f64 (.f64 b a) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale)))) (sqrt.f64 (.f64 (.f64 b a) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (pow.f64 (.f64 (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (*.f64 x-scale x-scale))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (sqrt.f64 (.f64 (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (*.f64 x-scale x-scale)))))))
(.f64 (pow.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) b) #s(literal 1/2 binary64)) (sqrt.f64 (.f64 (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))) (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))))))
(.f64 (pow.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b a)) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale)))))
(.f64 (pow.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 b a) x-scale) y-scale) #s(literal 1 binary64)))
(.f64 (sqrt.f64 a) (sqrt.f64 (.f64 b (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))))))
(.f64 (sqrt.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) b)) (sqrt.f64 (.f64 (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))) (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))))))
(.f64 (sqrt.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b a))) (sqrt.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale)))))
(.f64 (sqrt.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))))) (pow.f64 (/.f64 (/.f64 (.f64 b a) x-scale) y-scale) #s(literal 1 binary64)))
(.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))))
(+.f64 (/.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (/.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))))) (.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (-.f64 #s(literal 0 binary64) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))))
(+.f64 (.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))))) (/.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (/.f64 (.f64 x-scale x-scale) (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))))))
(+.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale)))))
(+.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale)))))
(fma.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (-.f64 #s(literal 0 binary64) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))))
(fma.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (/.f64 (.f64 x-scale x-scale) (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))))))
(fma.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))))
(fma.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))))
(/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))
(/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 y-scale (/.f64 (.f64 b a) (/.f64 (.f64 x-scale y-scale) (/.f64 (*.f64 b a) x-scale)))))
(.f64 b (.f64 a (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))))))
(.f64 b (.f64 (.f64 (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))) (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (*.f64 x-scale x-scale))))))
(.f64 a (.f64 b (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))))))
(.f64 (.f64 b a) (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))))
(.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (.f64 (.f64 b a) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))))
(.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))))
(.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))))
(.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (.f64 (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (*.f64 x-scale x-scale))))))
(.f64 (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale))))) (.f64 b a))
(.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) b) (.f64 (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))) (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale)))))
(.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b a)) (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))))
(.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 x-scale (.f64 b a)) (/.f64 (*.f64 b a) x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (.f64 b a) x-scale)))))
(/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))
(/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 y-scale (/.f64 (.f64 b a) (/.f64 (.f64 x-scale y-scale) (/.f64 (*.f64 b a) x-scale)))))
(/.f64 (.f64 (.f64 b a) (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale)))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale)))
(/.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale)))
(/.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 x-scale (.f64 b a)) (/.f64 (.f64 b a) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (.f64 b a) x-scale))) y-scale)
(/.f64 (neg.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 x-scale (.f64 b a)) (/.f64 (.f64 b a) x-scale)))) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (.f64 b a) x-scale)))) (-.f64 #s(literal 0 binary64) y-scale))
(.f64 b (.f64 (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))) (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale)))))
(.f64 a (.f64 b (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale)))))
(.f64 (.f64 b a) (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))))
(.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (.f64 (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (*.f64 b a)))
(.f64 (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (.f64 b (.f64 a (.f64 (*.f64 b a) #s(literal 8 binary64)))))
(.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (.f64 b a))
(.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))))
(.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (.f64 (/.f64 (/.f64 (.f64 b a) x-scale) y-scale) (*.f64 b a)))
(.f64 (.f64 (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))) (/.f64 (/.f64 (.f64 b a) x-scale) (/.f64 y-scale (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale)))) b)
(.f64 (.f64 (.f64 b a) (.f64 b a)) (/.f64 (/.f64 #s(literal 8 binary64) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))))
(.f64 (/.f64 (.f64 b a) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale))) (.f64 (.f64 b a) #s(literal 8 binary64)))
(.f64 (.f64 (.f64 b a) (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale)))) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))
(.f64 (.f64 (/.f64 (/.f64 (.f64 (.f64 b a) #s(literal 8 binary64)) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) b) a)
(.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 y-scale (/.f64 (.f64 b a) x-scale))) (/.f64 (/.f64 (*.f64 b a) x-scale) y-scale))
(.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 x-scale (.f64 b a)) (/.f64 (.f64 b a) x-scale))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))
(.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (*.f64 b a) x-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(+.f64 (+.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/3 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(fabs.f64 (PI.f64))
(-.f64 (+.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 1 binary64))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))
(expm1.f64 (log1p.f64 (PI.f64)))
(log1p.f64 (expm1.f64 (PI.f64)))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (E.f64) (log.f64 (PI.f64)))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (E.f64)))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(*.f64 (cbrt.f64 (PI.f64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4/3 binary64))))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/3 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(.f64 (exp.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))))) (exp.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64)))))
(.f64 (exp.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))))
(.f64 (cbrt.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(.f64 (sqrt.f64 (.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal -180 binary64)))
(sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))
(neg.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal -180 binary64))))

simplify1.2s (1.7%)

Algorithm

1×	egg-herbie

Rules

7116×	`-lowering-.f32`
7116×	`-lowering-.f64`
4040×	`+-lowering-+.f64`
4040×	`+-lowering-+.f32`
2198×	`/-lowering-/.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1498	148818
1	5617	117045
0	8107	117045

Stop Event

1×	iter limit
1×	node limit

Counts

252 → 252

Calls

Call 1

Inputs
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
(+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
(+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
(+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
(+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
(* (pow b 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
(* (pow b 2) (+ (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(* (pow b 2) (+ (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
(* (/ (* (pow a 2) (* (pow b 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
(* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (* (pow b 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
(* (pow a 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
(* (pow a 2) (+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(* (pow a 2) (+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
(* (/ (* (pow a 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
(* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(* -1 (* (/ (* (pow a 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* -1 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(* -1 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(* -1 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) x-scale)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))) y-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) x-scale)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow x-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) y-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))) y-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))) x-scale)
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 a 2) (* (pow b 2) (sqrt 8))) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* x-scale (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) y-scale)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))) x-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* x-scale (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) y-scale)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* x-scale (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow y-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) x-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))) x-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))) y-scale)
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 2))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (pow y-scale 2))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (pow y-scale 2))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 2))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (pow y-scale 2))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (pow y-scale 2))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow b 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* x-scale (sqrt 2)))) (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2))))
(+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow b 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* a (* (pow b 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* x-scale (sqrt 2)))))) (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2))))
(+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow b 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* x-scale (sqrt 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* a (* (pow b 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* x-scale (sqrt 2)))))))) (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2))))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (* (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))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -4 (* (/ (* (pow a 4) (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 2 (* (/ (* (pow a 4) (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))))
(* 8 (/ (* (pow a 4) (* (pow b 6) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 6) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow a 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow b 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(* 8 (/ (* (pow a 4) (* (pow b 6) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 6) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow a 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow b 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(* 8 (/ (* (pow a 4) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* 8 (/ (* (pow a 2) (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* 8 (/ (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -4 (* (/ (* (pow a 2) (* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* 8 (/ (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 2 (* (/ (* (pow a 2) (* (pow b 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))))
(* 8 (/ (* (pow a 6) (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 6) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow b 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow a 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(* 8 (/ (* (pow a 6) (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 6) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow b 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow a 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* (pow y-scale 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))))))) (pow x-scale 2))
(/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow y-scale 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) (pow y-scale 2))))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))) (pow x-scale 4))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))))) (pow x-scale 4))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))))) (pow x-scale 4))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) (pow y-scale 2))))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))) (pow x-scale 4))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))))) (pow x-scale 4))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))))) (pow x-scale 4))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* (pow x-scale 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))))) (pow y-scale 2))
(/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow x-scale 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow 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))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 4))))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))) (pow y-scale 4))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2))))) (pow y-scale 4))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))))) (pow y-scale 4))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 4))))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))) (pow y-scale 4))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2))))) (pow y-scale 4))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))))) (pow y-scale 4))
(* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))
(+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))
(+ (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 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)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* 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))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))

Outputs
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 b b) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64))))))))) (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))))) (.f64 (.f64 b b) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (+.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64)))))))) (.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64)))))) (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) #s(literal 3 binary64)))))))))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(.f64 b (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
(* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(.f64 b (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 b b))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
(* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(.f64 b (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 b b))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))))) (pow.f64 b #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b))
(* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(-.f64 #s(literal 0 binary64) (.f64 b (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 b b))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
(.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (pow.f64 b #s(literal 4 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 b b))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))))) (pow.f64 b #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 b))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 a a) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) #s(literal 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 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))))))) (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))))) (.f64 (.f64 a a) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (+.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) #s(literal 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 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))))) (.f64 (.f64 (.f64 a a) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) #s(literal 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 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 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 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) #s(literal 3 binary64)))))))))))))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(.f64 a (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
(* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(.f64 a (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (pow.f64 a #s(literal 4 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 a a))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))
(* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(.f64 a (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (pow.f64 a #s(literal 4 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 a a))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (pow.f64 a #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 a x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a))
(* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (pow.f64 a #s(literal 4 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 a a))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a))
(* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
(.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (pow.f64 a #s(literal 4 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 a a))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 -1/8 binary64) (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (pow.f64 a #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 a))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))
(* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))
(.f64 x-scale (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))))
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))
(.f64 x-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))))
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))))
(.f64 x-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (+.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))))))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale))))))))
(+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale)))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale)))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
(+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64)))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale))))))))
(+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale)))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale)))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))))))
(+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64)))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))
(* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
(.f64 y-scale (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))))
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))
(.f64 y-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 (.f64 y-scale y-scale) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))))
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))))
(.f64 y-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (.f64 (.f64 y-scale y-scale) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (+.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))))))))))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale))))))))
(+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale)))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale)))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))
(+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64)))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale))))))))
(+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale)))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale)))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))
(+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))))
(+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 angle angle) x-scale) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))
(+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 angle angle) x-scale) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (.f64 #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 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a a)))))) (*.f64 a (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))))
(+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (.f64 #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 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a a)))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 angle angle) x-scale) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (.f64 #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 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a a))))) (.f64 #s(literal 2 binary64) (.f64 a a))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (*.f64 a (sqrt.f64 #s(literal 2 binary64))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
(.f64 (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (.f64 x-scale y-scale)))
(* (pow b 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
(.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (.f64 x-scale y-scale))) (.f64 (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (*.f64 x-scale y-scale)))))
(* (pow b 2) (+ (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(.f64 (.f64 b b) (+.f64 (.f64 (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (.f64 x-scale y-scale))) (.f64 (.f64 b b) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64))))))))) (.f64 x-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64)))) (*.f64 x-scale y-scale))))))))
(* (pow b 2) (+ (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
(.f64 (.f64 b b) (+.f64 (.f64 (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (.f64 x-scale y-scale))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (.f64 x-scale y-scale))) (.f64 (.f64 b b) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64))))))) (.f64 x-scale y-scale)) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64)))))) (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) #s(literal 3 binary64)))))))))) (*.f64 x-scale y-scale))))))))))
(* (/ (* (pow a 2) (* (pow b 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b (.f64 b b)))) (.f64 x-scale y-scale)))
(* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(.f64 (.f64 b (.f64 b b)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 b b) x-scale) y-scale))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (*.f64 x-scale y-scale)))))
(* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(.f64 (.f64 b (.f64 b b)) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 b b) x-scale) y-scale))))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (*.f64 x-scale y-scale)))))
(* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(.f64 (.f64 b (.f64 b b)) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 b b) x-scale) y-scale))))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (.f64 x-scale y-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale y-scale))))))
(* -1 (* (/ (* (pow a 2) (* (pow b 3) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b (.f64 b b)))) (.f64 x-scale y-scale))))
(* -1 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 b b) x-scale) y-scale))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (.f64 x-scale y-scale)))) (neg.f64 (.f64 b (*.f64 b b))))
(* -1 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 b (.f64 b b)) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 b b) x-scale) y-scale))))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (*.f64 x-scale y-scale))))))
(* -1 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow a 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 b b) x-scale) y-scale))))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (.f64 x-scale y-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a a)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale y-scale))))) (neg.f64 (.f64 b (.f64 b b))))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
(.f64 (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (.f64 x-scale y-scale)))
(* (pow a 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))
(.f64 (.f64 a a) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (.f64 x-scale y-scale))) (.f64 (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (*.f64 x-scale y-scale)))))
(* (pow a 2) (+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))
(.f64 (.f64 a a) (+.f64 (.f64 (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (.f64 x-scale y-scale))) (.f64 (.f64 a a) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) #s(literal 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 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))))) (.f64 x-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (*.f64 x-scale y-scale))))))))
(* (pow a 2) (+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
(.f64 (.f64 a a) (+.f64 (.f64 (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (.f64 x-scale y-scale))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (.f64 x-scale y-scale))) (.f64 (.f64 a a) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) #s(literal 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 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 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 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) #s(literal 3 binary64)))))))))) (.f64 x-scale y-scale)) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) #s(literal 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 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))))) (*.f64 x-scale y-scale))))))))))
(* (/ (* (pow a 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (.f64 a (.f64 a a))) (.f64 x-scale y-scale)))
(* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))
(.f64 (.f64 a (.f64 a a)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 x-scale y-scale)))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (*.f64 x-scale y-scale)))))
(* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(.f64 (.f64 a (.f64 a a)) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 -1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 x-scale y-scale)))))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (*.f64 x-scale y-scale)))))
(* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(.f64 (.f64 a (.f64 a a)) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 -1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 x-scale y-scale)))))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (.f64 x-scale y-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 x-scale y-scale))))))
(* -1 (* (/ (* (pow a 3) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (.f64 a (.f64 a a))) (.f64 x-scale y-scale))))
(* -1 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
(.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 x-scale y-scale)))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (.f64 x-scale y-scale)))) (.f64 #s(literal -1 binary64) (.f64 a (.f64 a a))))
(* -1 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 a (.f64 a a)) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 -1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 x-scale y-scale)))))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (*.f64 x-scale y-scale))))))
(* -1 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1/4 (* (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3)))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) 2) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 a (.f64 a a)) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 -1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 x-scale y-scale)))))) (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (.f64 x-scale y-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 x-scale y-scale)))))))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
(.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (.f64 x-scale y-scale)))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) x-scale)
(/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))) (.f64 y-scale (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b b))) y-scale))) x-scale)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))) y-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) x-scale)
(/.f64 (+.f64 (.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) y-scale)) (.f64 (.f64 x-scale x-scale) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))))) y-scale)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (.f64 y-scale (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))))) x-scale)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* y-scale (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow x-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) y-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))) y-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))) x-scale)
(/.f64 (+.f64 (.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) y-scale)) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))) (.f64 y-scale (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))))) y-scale) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))))) y-scale)))))))) x-scale)
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
(.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (.f64 y-scale (*.f64 x-scale x-scale))))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))
(/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) y-scale))) (.f64 x-scale x-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))
(/.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))))) (.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) y-scale))) (.f64 x-scale x-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))
(/.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))))) (.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (.f64 y-scale (pow.f64 x-scale #s(literal 6 binary64)))))) (*.f64 x-scale x-scale))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
(.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (.f64 y-scale (*.f64 x-scale x-scale))))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))
(/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) y-scale))) (.f64 x-scale x-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))
(/.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))))) (.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) y-scale))) (.f64 x-scale x-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (* 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 (/ 1 (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) y-scale) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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))
(/.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))))) (.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))))))) (.f64 y-scale (pow.f64 x-scale #s(literal 6 binary64)))))) (*.f64 x-scale x-scale))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
(.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (.f64 x-scale y-scale)))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* x-scale (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) y-scale)
(/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))) (.f64 x-scale (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b b))) x-scale))) y-scale)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))) x-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* x-scale (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) y-scale)
(/.f64 (+.f64 (.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) x-scale)) (.f64 (.f64 y-scale y-scale) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) x-scale)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (.f64 x-scale (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))))) y-scale)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* x-scale (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* (pow y-scale 2) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) x-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))) x-scale) (sqrt (/ 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))) y-scale)
(/.f64 (+.f64 (.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) x-scale)) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))) (.f64 x-scale (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (.f64 (.f64 y-scale y-scale) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) x-scale) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 b b)) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))))) x-scale)))))))) y-scale)
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
(.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (.f64 x-scale (*.f64 y-scale y-scale))))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) x-scale))) (.f64 y-scale y-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (pow y-scale 2))
(/.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) x-scale))) (.f64 y-scale y-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (pow y-scale 2))
(/.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 6 binary64)))))) (*.f64 y-scale y-scale))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
(.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (.f64 x-scale (*.f64 y-scale y-scale))))
(/ (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (pow y-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) x-scale))) (.f64 y-scale y-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (pow y-scale 2))
(/.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) x-scale))) (.f64 y-scale y-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (+ (* -1/4 (* (/ (* (pow a 2) (* (pow b 2) (* (sqrt 8) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* x-scale (* (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)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) x-scale) (sqrt (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (pow y-scale 2))
(/.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 6 binary64)))))) (*.f64 y-scale y-scale))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/.f64 (.f64 (.f64 a (.f64 a a)) (.f64 (.f64 b b) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 x-scale (.f64 y-scale y-scale)))
(+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow b 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* x-scale (sqrt 2)))) (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2))))
(+.f64 (/.f64 (.f64 (.f64 a (.f64 a a)) (.f64 (.f64 b b) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 a (.f64 angle angle)) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow b 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* a (* (pow b 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* x-scale (sqrt 2)))))) (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2))))
(+.f64 (/.f64 (.f64 (.f64 a (.f64 a a)) (.f64 (.f64 b b) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 x-scale (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 a x-scale) (+.f64 (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (.f64 #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 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a a)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow b 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* x-scale (sqrt 2)))) (* (pow angle 2) (+ (* 1/2 (/ (* a (* (pow angle 2) (* (pow b 2) (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (+ (* 1/2 (/ (* (pow y-scale 2) (* (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* x-scale (sqrt 2)))) (* 1/2 (/ (* a (* (pow b 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 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 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* x-scale (sqrt 2)))))))) (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2))))
(+.f64 (/.f64 (.f64 (.f64 a (.f64 a a)) (.f64 (.f64 b b) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 x-scale (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 a x-scale) (+.f64 (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (.f64 #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 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a a))))) (.f64 #s(literal 2 binary64) (.f64 a a))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b)) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (.f64 #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 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 a a))))) (sqrt.f64 #s(literal 2 binary64))))))))))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #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 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (*.f64 x-scale y-scale)))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #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 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (*.f64 x-scale y-scale)))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #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 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (*.f64 x-scale y-scale)))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #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 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (*.f64 x-scale y-scale)))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #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 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (*.f64 x-scale y-scale)))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #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 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (*.f64 x-scale y-scale)))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #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 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (*.f64 x-scale y-scale)))
(* (/ (* (pow a 2) (* (pow b 2) (sqrt 8))) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #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 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (*.f64 x-scale y-scale)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (* (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))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 #s(literal 8 binary64) (.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64)))) (.f64 y-scale y-scale)) (/.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -4 (* (/ (* (pow a 4) (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 b b)) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 2 (* (/ (* (pow a 4) (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) #s(literal -1/2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))) #s(literal -1/4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))
(* 8 (/ (* (pow a 4) (* (pow b 6) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* (pow b 6) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 b b))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 b b))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 b #s(literal 4 binary64)))))))
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow a 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow b 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 b #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 b b))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 b #s(literal 6 binary64))))))))
(* 8 (/ (* (pow a 4) (* (pow b 6) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* (pow b 6) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 b b))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 b b))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 y-scale y-scale) (*.f64 x-scale x-scale)) (pow.f64 b #s(literal 4 binary64)))))))
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow a 4) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow b 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 b #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 y-scale y-scale) (.f64 x-scale x-scale)) (.f64 b b))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 b #s(literal 6 binary64))))))))
(* 8 (/ (* (pow a 4) (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))
(* (pow a 4) (+ (* 8 (/ (* (pow a 2) (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale))))))
(* (pow a 4) (+ (* 8 (/ (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -4 (* (/ (* (pow a 2) (* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 a a) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(* (pow a 4) (+ (* 8 (/ (* (pow b 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 2 (* (/ (* (pow a 2) (* (pow b 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3)))))))))))
(.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (.f64 #s(literal 8 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))))
(* 8 (/ (* (pow a 6) (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 6 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* (pow a 6) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow b 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow a 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 a #s(literal 6 binary64))))) (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))
(* 8 (/ (* (pow a 6) (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 6 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* (pow a 6) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))
(.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))))
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (pow (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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))))))
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 2 (* (/ (* (pow b 4) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (pow a 6) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 8 (/ (* (pow b 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 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 4) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (pow.f64 a #s(literal 6 binary64))))) (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -8 binary64) (.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 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 y-scale y-scale))) (.f64 x-scale x-scale))
(/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* (pow y-scale 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))))))) (pow x-scale 2))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 y-scale y-scale)) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))))))) (*.f64 x-scale x-scale))
(/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow x-scale 2) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow y-scale 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow y-scale 2) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 y-scale y-scale)) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))))) (.f64 x-scale x-scale))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))) (pow x-scale 4))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64)))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))))) (pow x-scale 4))
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 4 binary64)))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))))) (pow x-scale 4))
(/.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 4 binary64)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 4) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))) (pow x-scale 4))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64)))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2))))) (pow x-scale 4))
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale))) #s(literal 3 binary64))))) (pow.f64 x-scale #s(literal 4 binary64)))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))) (pow y-scale 2)))))) (pow x-scale 4))
(/.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 3 binary64))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 4 binary64)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 x-scale x-scale))) (.f64 y-scale y-scale))
(/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))))) (* (pow x-scale 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))))) (pow y-scale 2))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 x-scale x-scale)) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64))))))) (*.f64 y-scale y-scale))
(/ (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (pow x-scale 2) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow y-scale 2) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow x-scale 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (pow 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))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 x-scale x-scale)) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))))) (.f64 y-scale y-scale))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 4))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))) (pow y-scale 4))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (*.f64 x-scale x-scale))) (pow.f64 y-scale #s(literal 4 binary64)))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2))))) (pow y-scale 4))
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 4 binary64)))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))))) (pow y-scale 4))
(/.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale)))))) (pow.f64 y-scale #s(literal 4 binary64)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 4))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))) (pow y-scale 4))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (*.f64 x-scale x-scale))) (pow.f64 y-scale #s(literal 4 binary64)))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2))))) (pow y-scale 4))
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale))) #s(literal 3 binary64))))) (pow.f64 y-scale #s(literal 4 binary64)))
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 4) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (pow x-scale 2)))))) (pow y-scale 4))
(/.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 3 binary64))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale)))))) (pow.f64 y-scale #s(literal 4 binary64)))
(* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))
(.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64))))
(+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))
(+.f64 (.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 6 binary64))) (.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (.f64 angle angle) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale))))
(+ (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+.f64 (.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 6 binary64))) (.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 8 binary64) (.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 (.f64 angle angle) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (.f64 #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 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)))))))
(+ (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow angle 2) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))))))
(+.f64 (.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 6 binary64))) (.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64)))) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (.f64 (.f64 angle angle) (.f64 #s(literal 8 binary64) (.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 (.f64 angle angle) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale))) (-.f64 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (.f64 #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 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) #s(literal -1/787320000 binary64))) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (.f64 #s(literal 2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 y-scale y-scale)))))))))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (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 x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 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))))) (sqrt.f64 (+.f64 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(* 8 (/ (* (pow a 4) (pow b 4)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (.f64 #s(literal 8 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/64800 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) (.f64 (.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 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)))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/24488801280000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64)))))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(* 1/180 (* angle (PI)))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(.f64 angle (+.f64 (.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 angle angle)) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/180 binary64) (PI.f64)) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 #s(literal 1/22674816000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 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))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/180 binary64) (PI.f64)) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/30855889612800000000 binary64) (.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)))))))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))

eval323.0ms (0.5%)

Compiler: Compiled 283925 to 6041 computations (97.9% saved)

prune209.0ms (0.3%)

Pruning

14 alts after pruning (14 fresh and 0 done)

	Pruned	Kept	Total
New	886	14	900
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	887	14	901

Accuracy

44.6%

Counts

901 → 14

Alt Table

Click to see full alt table

Status	Accuracy	Program
	1.7%	(/.f64 (.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b b))) (.f64 x-scale y-scale))) (/.f64 (.f64 (.f64 b (.f64 #s(literal 4 binary64) (.f64 b a))) a) (.f64 x-scale (.f64 y-scale (*.f64 x-scale y-scale)))))
	0.4%	(/.f64 (sqrt.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 y-scale y-scale)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) #s(literal 2 binary64)))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 x-scale x-scale))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 b (.f64 #s(literal 4 binary64) (.f64 b a))) a) (.f64 x-scale (.f64 y-scale (*.f64 x-scale y-scale)))))
	0.0%	(/.f64 (sqrt.f64 (/.f64 (.f64 #s(literal 8 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))))))) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b (.f64 #s(literal 4 binary64) (.f64 b a))) a) (.f64 x-scale (.f64 y-scale (*.f64 x-scale y-scale)))))
	0.2%	(/.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))))))) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64)))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))))) (/.f64 (.f64 (.f64 b (.f64 #s(literal 4 binary64) (.f64 b a))) a) (.f64 x-scale (.f64 y-scale (.f64 x-scale y-scale)))))
▶	0.4%	(.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))) (.f64 x-scale y-scale)) (.f64 x-scale y-scale))
▶	1.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	3.4%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	2.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale))))))))
	3.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))
	4.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (.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)))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)))))) (pow.f64 (.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(literal 2 binary64)))))))
▶	7.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))
	4.4%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))
▶	2.4%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale))))))))
▶	34.2%	(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Compiler

Compiled 4900 to 1350 computations (72.4% saved)

simplify346.0ms (0.5%)

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
✓	cost-diff	0	(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
✓	cost-diff	0	(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))))))
✓	cost-diff	0	(sqrt.f64 #s(literal 8 binary64))
✓	cost-diff	0	(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
✓	cost-diff	0	(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (.f64 x-scale x-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 2 binary64)) (.f64 b b)) (*.f64 x-scale x-scale))))))))
✓	cost-diff	0	(*.f64 b x-scale)
✓	cost-diff	0	(.f64 (.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
✓	cost-diff	0	(.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
✓	cost-diff	0	(/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64)))))
✓	cost-diff	0	(.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))) (.f64 x-scale y-scale))
✓	cost-diff	0	(.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 (.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale)) (-.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 y-scale y-scale))) (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 y-scale (.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))))) (.f64 x-scale x-scale)))) (.f64 b (.f64 a (.f64 (.f64 b a) #s(literal 8 binary64))))) (/.f64 (/.f64 y-scale (/.f64 (.f64 b a) x-scale)) (/.f64 (/.f64 (.f64 b a) x-scale) y-scale)))) (.f64 a (.f64 b (.f64 (.f64 b a) #s(literal 4 binary64))))) (.f64 x-scale y-scale)) (.f64 x-scale y-scale))
✓	cost-diff	128	(*.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))
✓	cost-diff	0	(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))
✓	cost-diff	0	(*.f64 a x-scale)
✓	cost-diff	0	(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))
✓	cost-diff	0	(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Rules

5972×	`-lowering-.f32`
5972×	`-lowering-.f64`
3188×	`/-lowering-/.f32`
3188×	`/-lowering-/.f64`
1444×	`times-frac`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	127	4851
1	401	4556
2	1541	4023
3	6196	3992
0	8055	3992

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* 1/4 (* (* a x-scale) (* (sqrt 8) (sqrt 2))))
1/4
(* (* a x-scale) (* (sqrt 8) (sqrt 2)))
(* a x-scale)
a
x-scale
(* (sqrt 8) (sqrt 2))
(sqrt 8)
8
(sqrt 2)
2
(* (* (/ (sqrt (/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale)))) (* a (* b (* (* b a) 4)))) (* x-scale y-scale)) (* x-scale y-scale))
(* (/ (sqrt (/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale)))) (* a (* b (* (* b a) 4)))) (* x-scale y-scale))
(/ (sqrt (/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale)))) (* a (* b (* (* b a) 4))))
(sqrt (/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale))))
(/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale)))
(* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8))))
(- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale))))
(/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))
(+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))))
(* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))
(* a a)
a
(+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))
1/2
(* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))
(cos (* 2 (/ angle (/ 180 (PI)))))
(* 2 (/ angle (/ 180 (PI))))
2
(/ angle (/ 180 (PI)))
angle
(/ 180 (PI))
180
(PI)
(* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))
(* b b)
b
(- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))
(* y-scale y-scale)
y-scale
(- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))
(sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))))))
(- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))
(/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale))
(+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))))
(* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))
(* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))
(* x-scale x-scale)
x-scale
(/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))
(cos (/ angle (/ 180 (PI))))
(/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))
(* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))
(sin (/ angle (/ 180 (PI))))
(/ (- (* b b) (* a a)) (/ x-scale 2))
(- (* b b) (* a a))
(/ x-scale 2)
(* b (* a (* (* b a) 8)))
(* a (* (* b a) 8))
(* (* b a) 8)
(* b a)
8
(/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale))
(/ y-scale (/ (* b a) x-scale))
(/ (* b a) x-scale)
(/ (/ (* b a) x-scale) y-scale)
(* a (* b (* (* b a) 4)))
(* b (* (* b a) 4))
(* (* b a) 4)
4
(* x-scale y-scale)
(* (* 1/4 (* (* b x-scale) (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (sqrt (+ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale))))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))))))
(* 1/4 (* (* b x-scale) (* y-scale (sqrt 8))))
1/4
(* (* b x-scale) (* y-scale (sqrt 8)))
(* b x-scale)
b
x-scale
(* y-scale (sqrt 8))
y-scale
(sqrt 8)
8
(sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (sqrt (+ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale))))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)))))
(- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (sqrt (+ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale))))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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)
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
1/180
(* angle (PI))
angle
(PI)
2
(* x-scale x-scale)
(/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(* y-scale y-scale)
(sqrt (+ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale))))) (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)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale))))) (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)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale)))))
4
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale))))
(/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale)))
(* (* y-scale y-scale) (* x-scale x-scale))
(pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2)
(- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))
(* (* 1/4 (* x-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))))))))
(* 1/4 (* x-scale (sqrt 8)))
1/4
(* x-scale (sqrt 8))
x-scale
(sqrt 8)
8
(sqrt (+ (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))))))
(+ (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))))))
(+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))
(* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))
(* a a)
a
(pow (cos (* 1/180 (* angle (PI)))) 2)
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
1/180
(* angle (PI))
angle
(PI)
2
(* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(* b b)
b
(* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))))
-1/2
(/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))))
(+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale)))
(* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))))
(* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))))
-2
(+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))
(/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))
(* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* x-scale x-scale)
(/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b))
(/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))
(* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a))))))
4
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))
(* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a))))
(* (- (* b b) (* a a)) (- (* b b) (* a a)))
(- (* b b) (* a a))
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))))))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
1/4
(* x-scale (* y-scale (sqrt 8)))
x-scale
(* y-scale (sqrt 8))
y-scale
(sqrt 8)
8
(sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))))))
(+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))))))
(+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))
(/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))
(* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* a a)
a
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
1/180
(* angle (PI))
angle
(PI)
2
(* x-scale x-scale)
(/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b))
(pow (cos (* 1/180 (* angle (PI)))) 2)
(cos (* 1/180 (* angle (PI))))
(* b b)
b
(* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))))
-1/2
(/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))))
(+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale)))
(* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))))
(* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))))
-2
(+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))
(* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))
(* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))
(/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))
(* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a))))))
4
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))
(* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a))))
(* (- (* b b) (* a a)) (- (* b b) (* a a)))
(- (* b b) (* a a))

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

localize7.8s (11%)

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	3.1%	(PI.f64)
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	3.1%	(PI.f64)
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	3.1%	(PI.f64)
✓	accuracy	100.0%	(sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))
✓	accuracy	3.1%	(PI.f64)
✓	accuracy	100.0%	(*.f64 a x-scale)
✓	accuracy	100.0%	(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 2 binary64))

Results

6.9s

256×

exit

Compiler

Compiled 5523 to 125 computations (97.7% saved)

Precisions

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

ival-cos: 1.4s (30.7% of total)

ival-sin: 1.1s (25.1% of total)

ival-mult: 525.0ms (11.8% of total)

backward-pass: 501.0ms (11.3% of total)

ival-div: 361.0ms (8.1% of total)

ival-sqrt: 180.0ms (4.1% of total)

ival-add: 115.0ms (2.6% of total)

ival-pow: 80.0ms (1.8% of total)

...c/correct-round.rkt:119:19: 78.0ms (1.8% of total)

ival-sub: 62.0ms (1.4% of total)

compiled-spec: 40.0ms (0.9% of total)

ival-pi: 15.0ms (0.3% of total)

const: 6.0ms (0.1% of total)

series1.2s (1.7%)

Counts

27 → 660

Calls

Call 1

Inputs
#<alt (* 1/4 (* (* a x-scale) (* (sqrt 8) (sqrt 2))))>
#<alt (* (* a x-scale) (* (sqrt 8) (sqrt 2)))>
#<alt (* a x-scale)>
#<alt (* (sqrt 8) (sqrt 2))>
#<alt (* 2 (/ angle (/ 180 (PI))))>
#<alt (* (* (/ (sqrt (/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale)))) (* a (* b (* (* b a) 4)))) (* x-scale y-scale)) (* x-scale y-scale))>
#<alt (* (/ (sqrt (/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale)))) (* a (* b (* (* b a) 4)))) (* x-scale y-scale))>
#<alt (/ (sqrt (/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale)))) (* a (* b (* (* b a) 4))))>
#<alt (* (* 1/4 (* (* b x-scale) (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (sqrt (+ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale))))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))))))>
#<alt (* 1/4 (* (* b x-scale) (* y-scale (sqrt 8))))>
#<alt (* (* b x-scale) (* y-scale (sqrt 8)))>
#<alt (* b x-scale)>
#<alt (* (* 1/4 (* x-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))))))))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* x-scale (sqrt 8))>
#<alt (sqrt 8)>
#<alt (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))))))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* y-scale (sqrt 8))>
#<alt (sqrt 2)>
#<alt (PI)>
#<alt (cos (* 2 (/ angle (/ 180 (PI)))))>
#<alt (cos (/ angle (/ 180 (PI))))>
#<alt (sin (/ angle (/ 180 (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>

Outputs
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a (* x-scale (* (sqrt 2) (sqrt 8))))>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/90 (* angle (PI)))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))>
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))>
#<alt (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))>
#<alt (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))>
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))>
#<alt (* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))>
#<alt (* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))))>
#<alt (+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))>
#<alt (+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (+ (* 1/2 (/ (* (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))>
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))>
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))>
#<alt (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))>
#<alt (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))>
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))>
#<alt (* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))>
#<alt (* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))>
#<alt (* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))>
#<alt (* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))>
#<alt (* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))>
#<alt (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))>
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))>
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))>
#<alt (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))>
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))>
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))>
#<alt (* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))>
#<alt (* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))>
#<alt (* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))>
#<alt (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))>
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))>
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))>
#<alt (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))>
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))>
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))>
#<alt (+ (* 1/8 (* (* (pow a 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))>
#<alt (+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))>
#<alt (+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))>
#<alt (* 1/4 (* (* a (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))>
#<alt (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))>
#<alt (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))>
#<alt (* -1/4 (* (* a (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))>
#<alt (* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))>
#<alt (* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))>
#<alt (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale))>
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale)))>
#<alt (+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))))))>
#<alt (+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (+ (* 1/2 (/ (* (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))>
#<alt (+ (* 1/8 (* (* (pow b 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))>
#<alt (+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))>
#<alt (+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))>
#<alt (* 1/4 (* (* b (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))>
#<alt (* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))>
#<alt (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))>
#<alt (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))>
#<alt (* -1/4 (* (* b (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))>
#<alt (* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))>
#<alt (* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))>
#<alt (+ (* -1/16 (* (/ (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))>
#<alt (+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))>
#<alt (+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))))>
#<alt (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))>
#<alt (/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) y-scale)>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) y-scale)>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) y-scale)>
#<alt (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))>
#<alt (* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) y-scale))>
#<alt (* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) y-scale))>
#<alt (* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))) y-scale))>
#<alt (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))>
#<alt (+ (* -1/16 (* (/ (* (pow x-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))>
#<alt (+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))>
#<alt (+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))))>
#<alt (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))>
#<alt (/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) x-scale)>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) x-scale)>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) x-scale)>
#<alt (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))>
#<alt (* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) x-scale))>
#<alt (* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) x-scale))>
#<alt (* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))) x-scale))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))>
#<alt (+ (* 1/8 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))>
#<alt (+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))>
#<alt (+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))>
#<alt (* 1/4 (* (/ (* a (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))>
#<alt (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))>
#<alt (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))>
#<alt (* -1/4 (* (/ (* a (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))>
#<alt (* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))>
#<alt (* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))>
#<alt (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2))))>
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (* x-scale (sqrt 2))))) (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2)))))>
#<alt (+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (* a (* x-scale (sqrt 2))))) (* 1/8 (/ (* (pow angle 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (* x-scale (sqrt 2))))))))>
#<alt (+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (* a (* x-scale (sqrt 2))))) (* (pow angle 2) (+ (* 1/8 (/ (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (* x-scale (sqrt 2))))) (* 1/8 (/ (* (pow angle 2) (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (+ (* 1/2 (/ (* (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (* x-scale (sqrt 2))))))))))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))>
#<alt (+ (* 1/8 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))>
#<alt (+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))>
#<alt (+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))>
#<alt (* 1/4 (* (/ (* b (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))>
#<alt (* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))>
#<alt (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))>
#<alt (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))>
#<alt (* -1/4 (* (/ (* b (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))>
#<alt (* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))>
#<alt (* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))>
#<alt (/ (+ (* -1/16 (* (/ (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* x-scale (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) y-scale)>
#<alt (/ (+ (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) x-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* x-scale (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) y-scale)>
#<alt (/ (+ (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* x-scale (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) x-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) x-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))) y-scale)>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))>
#<alt (/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (pow y-scale 2))>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 2))>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 2))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))>
#<alt (/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (pow y-scale 2))>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 2))>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 2))>
#<alt (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))>
#<alt (/ (+ (* -1/16 (* (/ (* (pow x-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) x-scale)>
#<alt (/ (+ (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) y-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) x-scale)>
#<alt (/ (+ (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) y-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) y-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))) x-scale)>
#<alt (* 1/4 (* (/ (sqrt 8) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))>
#<alt (/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (pow x-scale 2))>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 2))>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 2))>
#<alt (* 1/4 (* (/ (sqrt 8) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))>
#<alt (/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (pow x-scale 2))>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 2))>
#<alt (/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 2))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* x-scale (+ (* -1/16 (* (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (* x-scale (+ (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* -1/16 (* (/ (* b (* y-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))>
#<alt (* x-scale (+ (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* b (* y-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* -1/8 (* (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (+ (* -1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))>
#<alt (+ (* -1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (+ (* -1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (+ (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (+ (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))>
#<alt (+ (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* y-scale (+ (* -1/16 (* (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (* y-scale (+ (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* -1/16 (* (/ (* b (* x-scale (* (sqrt 8) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))>
#<alt (* y-scale (+ (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* b (* x-scale (* (sqrt 8) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* -1/8 (* (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))>
#<alt (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (+ (* -1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))>
#<alt (+ (* -1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (+ (* -1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))>
#<alt (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (+ (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (+ (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))>
#<alt (+ (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))>
#<alt (* 1/4 (* (* angle (* b (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))>
#<alt (* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))))>
#<alt (* angle (+ (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -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/4 (/ (pow (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))>
#<alt (* angle (+ (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -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/4 (/ (pow (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow y-scale 2))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow y-scale 2))) (+ (* 1/22216240521216000000000 (/ (pow (PI) 8) (pow x-scale 2))) (+ (* 1/793437161472000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/634749729177600000000 (/ (pow (PI) 8) (pow x-scale 2))))))) (+ (* 1/2 (* (pow x-scale 2) (- (+ (* 1/11108120260608000000000 (/ (pow (PI) 8) (pow x-scale 4))) (+ (* 1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 4))) (+ (* 1/317374864588800000000 (/ (pow (PI) 8) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 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))))))) (+ (* 4 (+ (* -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))))))))) (pow (- (+ (* 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)))) 2)))))) (+ (* -1/198359290368000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/1388515032576000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/4 (* (pow x-scale 4) (pow (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2))))) 2))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))))))))))) (* 1/2 (/ (* (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (- (+ (* -1/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/4 (/ (pow (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))))))) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b (* x-scale (* y-scale (sqrt 8))))>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* b x-scale)>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))>
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))>
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))>
#<alt (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))) (* a (sqrt 2)))) (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))))>
#<alt (+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) 2) (* (pow a 2) (pow (sqrt 2) 2)))))))) (* a (sqrt 2)))))))>
#<alt (+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) 2) (* (pow a 2) (pow (sqrt 2) 2))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (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)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow a 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (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) (+ (* (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 x-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-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))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (pow b 2))) (+ (/ (* (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 x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2)))))) (pow b 2)) (/ (* (pow x-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))) (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 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)))))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) 2) (* (pow a 2) (pow (sqrt 2) 2)))))) (* (pow a 2) (pow (sqrt 2) 2)))))))) (* a (sqrt 2)))))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))>
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))>
#<alt (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))>
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 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)))) (* (pow b 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))>
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))>
#<alt (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))>
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))>
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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)))))))) (* b (sqrt 2)))))))>
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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)))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (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)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow a 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (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) (+ (* (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 x-scale 2))))) (pow a 2))) (* 4 (/ (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-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))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (pow a 2)) (/ (* (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2)))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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/2 (/ (* (pow x-scale 2) (* (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))>
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))>
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))>
#<alt (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))>
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* x-scale (* y-scale (sqrt 8)))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt (* y-scale (sqrt 8))>
#<alt 1>
#<alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))>
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))>
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt 1>
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))>
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))>
#<alt (+ 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)))))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (* 1/180 (* angle (PI)))>
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))>
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))>
#<alt (* 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))))))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt 1>
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))>
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))>
#<alt (+ 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)))))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (* 1/180 (* angle (PI)))>
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))>
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))>
#<alt (* 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))))))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>

Calls

165 calls:

Time	Variable		Point	Expression
87.0ms	angle	@	0	(* (* 1/4 (* (* b x-scale) (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (sqrt (+ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale))))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))))))
56.0ms	a	@	-inf	(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))))))))
34.0ms	a	@	inf	(* (* 1/4 (* x-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))))))))
26.0ms	b	@	inf	(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))))))))
21.0ms	b	@	inf	(* (* 1/4 (* x-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))))))))

rewrite412.0ms (0.6%)

Algorithm

1×	batch-egg-rewrite

Rules

4516×	`-lowering-.f32`
4516×	`-lowering-.f64`
2496×	`/-lowering-/.f32`
2496×	`/-lowering-/.f64`
2056×	`fma-lowering-fma.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	127	1095
1	614	836
2	4510	629
0	8147	629

Stop Event

1×	iter limit
1×	node limit

Counts

27 → 250

Calls

Call 1

Inputs
(* 1/4 (* (* a x-scale) (* (sqrt 8) (sqrt 2))))
(* (* a x-scale) (* (sqrt 8) (sqrt 2)))
(* a x-scale)
(* (sqrt 8) (sqrt 2))
(* 2 (/ angle (/ 180 (PI))))
(* (* (/ (sqrt (/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale)))) (* a (* b (* (* b a) 4)))) (* x-scale y-scale)) (* x-scale y-scale))
(* (/ (sqrt (/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale)))) (* a (* b (* (* b a) 4)))) (* x-scale y-scale))
(/ (sqrt (/ (* (- (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)) (- (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)) (/ (+ (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* y-scale y-scale)))) (* (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2))))) (/ (cos (/ angle (/ 180 (PI)))) (/ y-scale (* (sin (/ angle (/ 180 (PI)))) (/ (- (* b b) (* a a)) (/ x-scale 2)))))))) (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI)))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ angle (/ 180 (PI))))))))) (* x-scale x-scale)))) (* b (* a (* (* b a) 8)))) (/ (/ y-scale (/ (* b a) x-scale)) (/ (/ (* b a) x-scale) y-scale)))) (* a (* b (* (* b a) 4))))
(* (* 1/4 (* (* b x-scale) (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) (sqrt (+ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (* y-scale y-scale) (* x-scale x-scale))))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))))))
(* 1/4 (* (* b x-scale) (* y-scale (sqrt 8))))
(* (* b x-scale) (* y-scale (sqrt 8)))
(* b x-scale)
(* (* 1/4 (* x-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))))))))
(* 1/4 (* x-scale (sqrt 8)))
(* x-scale (sqrt 8))
(sqrt 8)
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* b b)) (* x-scale x-scale)))) (/ (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))))))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* x-scale (* y-scale (sqrt 8)))
(* y-scale (sqrt 8))
(sqrt 2)
(PI)
(cos (* 2 (/ angle (/ 180 (PI)))))
(cos (/ angle (/ 180 (PI))))
(sin (/ angle (/ 180 (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))

Outputs
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 x-scale #s(literal 4 binary64))))
(.f64 a (.f64 (*.f64 x-scale #s(literal 4 binary64)) #s(literal 1/4 binary64)))
(.f64 (.f64 a x-scale) #s(literal 1 binary64))
(.f64 (.f64 a (*.f64 x-scale #s(literal 4 binary64))) #s(literal 1/4 binary64))
(.f64 #s(literal 4 binary64) (.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a))
(.f64 #s(literal 1 binary64) (.f64 a x-scale))
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64))
(.f64 (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale #s(literal 4 binary64)))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 a (.f64 x-scale #s(literal 4 binary64)))
(.f64 x-scale (.f64 a #s(literal 4 binary64)))
(.f64 (.f64 a x-scale) #s(literal 4 binary64))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))))
(.f64 #s(literal 4 binary64) (.f64 a x-scale))
(.f64 (.f64 a (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (.f64 a #s(literal 4 binary64)) x-scale)
(.f64 (.f64 x-scale #s(literal 4 binary64)) a)
(*.f64 a x-scale)
(*.f64 x-scale a)
#s(literal 4 binary64)
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (*.f64 angle (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 180 binary64) (PI.f64)) (*.f64 #s(literal 2 binary64) angle)))
(/.f64 (*.f64 #s(literal 2 binary64) angle) (/.f64 #s(literal 180 binary64) (PI.f64)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) angle)) (/.f64 #s(literal -180 binary64) (PI.f64)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) angle)) (/.f64 #s(literal -180 binary64) (PI.f64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) angle) #s(literal 2 binary64)) (/.f64 #s(literal -180 binary64) (PI.f64)))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) angle) #s(literal 180 binary64)) (/.f64 #s(literal 1 binary64) (PI.f64)))
(pow.f64 (/.f64 (/.f64 #s(literal 180 binary64) (PI.f64)) (*.f64 #s(literal 2 binary64) angle)) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))
(.f64 angle (.f64 (/.f64 (PI.f64) #s(literal 180 binary64)) #s(literal 2 binary64)))
(*.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 2 binary64) angle) (/.f64 (PI.f64) #s(literal 180 binary64)))
(.f64 (/.f64 angle #s(literal 180 binary64)) (.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 #s(literal 1/90 binary64) (/.f64 angle (/.f64 #s(literal 1 binary64) (PI.f64))))
(.f64 (.f64 #s(literal 2 binary64) (/.f64 angle #s(literal 180 binary64))) (PI.f64))
(.f64 (/.f64 (.f64 #s(literal 2 binary64) angle) #s(literal 180 binary64)) (PI.f64))
(.f64 (/.f64 (.f64 #s(literal 2 binary64) angle) #s(literal 1 binary64)) (/.f64 (PI.f64) #s(literal 180 binary64)))
(.f64 (/.f64 (.f64 #s(literal 2 binary64) angle) #s(literal -180 binary64)) (-.f64 #s(literal 0 binary64) (PI.f64)))
(/.f64 (.f64 (.f64 x-scale y-scale) (/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 x-scale y-scale)) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))))
(/.f64 (.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) a)))
(/.f64 (.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 b (.f64 (*.f64 a b) #s(literal 4 binary64))))
(/.f64 (.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 x-scale y-scale)) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 x-scale y-scale)) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))))
(.f64 x-scale (.f64 y-scale (/.f64 (.f64 x-scale y-scale) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (*.f64 a (/.f64 b x-scale))))))))
(.f64 y-scale (.f64 x-scale (/.f64 (.f64 x-scale y-scale) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (*.f64 a (/.f64 b x-scale))))))))
(.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) a) (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64)))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))))
(.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64))))) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))))
(.f64 (.f64 x-scale y-scale) (/.f64 (.f64 x-scale y-scale) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (*.f64 a (/.f64 b x-scale)))))))
(.f64 (/.f64 (.f64 x-scale y-scale) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))))) (*.f64 x-scale y-scale))
(.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64))))))
(.f64 (.f64 x-scale (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))))) (.f64 x-scale (.f64 y-scale y-scale)))
(.f64 (.f64 x-scale (/.f64 (.f64 x-scale y-scale) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (*.f64 a (/.f64 b x-scale))))))) y-scale)
(.f64 (.f64 (/.f64 (.f64 x-scale y-scale) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (*.f64 a (/.f64 b x-scale)))))) y-scale) x-scale)
(/.f64 (.f64 x-scale y-scale) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (*.f64 a (/.f64 b x-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 x-scale y-scale)) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))))
(/.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 x-scale y-scale)) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 x-scale y-scale)) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) (.f64 (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) a)))
(/.f64 (.f64 (.f64 x-scale y-scale) #s(literal 1 binary64)) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))))
(/.f64 (.f64 (.f64 x-scale y-scale) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))))) (.f64 (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) a)))
(/.f64 (.f64 (.f64 x-scale y-scale) (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a)) (.f64 b (.f64 (*.f64 a b) #s(literal 4 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 x-scale y-scale)) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) (.f64 x-scale y-scale)) (.f64 (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) a)))
(/.f64 (.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a) (.f64 x-scale y-scale)) (.f64 b (.f64 (*.f64 a b) #s(literal 4 binary64))))
(/.f64 (/.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 x-scale y-scale)) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a) (.f64 b (.f64 (*.f64 a b) #s(literal 4 binary64))))
(/.f64 (/.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 x-scale y-scale)) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 a b)) (.f64 (*.f64 a b) #s(literal 4 binary64)))
(/.f64 (/.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 x-scale y-scale)) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 (*.f64 a b) #s(literal 4 binary64)))) a)
(pow.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 x-scale y-scale)) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) #s(literal -1 binary64))
(.f64 x-scale (.f64 y-scale (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))))))
(.f64 y-scale (.f64 x-scale (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))))))
(.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) a) (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64)))) (.f64 x-scale y-scale)))
(.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (/.f64 (.f64 x-scale y-scale) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64))))))
(.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64))))) (.f64 x-scale y-scale))
(.f64 (.f64 x-scale y-scale) (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64))))))
(.f64 (.f64 x-scale (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))))) y-scale)
(.f64 (/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 x-scale y-scale)) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (/.f64 (/.f64 #s(literal 1 binary64) a) (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64)))))
(.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a) (/.f64 (.f64 x-scale y-scale) (.f64 b (.f64 (*.f64 a b) #s(literal 4 binary64)))))
(.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 a b)) (/.f64 (.f64 x-scale y-scale) (.f64 (*.f64 a b) #s(literal 4 binary64))))
(.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (*.f64 x-scale y-scale) a))
(.f64 (.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64))))) y-scale) x-scale)
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (*.f64 a (/.f64 b x-scale)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) a))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64))))))
(/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))) (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (*.f64 a (/.f64 b x-scale)))) a)))
(/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 y-scale (*.f64 a (/.f64 b x-scale)))))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) (.f64 (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) a)))
(/.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a) (.f64 b (.f64 (*.f64 a b) #s(literal 4 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))))))
(/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) #s(literal 1 binary64)) (.f64 (/.f64 y-scale (.f64 a (/.f64 b x-scale))) (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))))) (neg.f64 (.f64 (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) a))))
(/.f64 (neg.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a)) (neg.f64 (.f64 b (.f64 (*.f64 a b) #s(literal 4 binary64)))))
(/.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 a b)) (.f64 (*.f64 a b) #s(literal 4 binary64)))
(/.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 (*.f64 a b) #s(literal 4 binary64)))) a)
(/.f64 (.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) #s(literal 1 binary64)) (.f64 b (.f64 a (.f64 (*.f64 a b) #s(literal 4 binary64)))))
(/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 (/.f64 #s(literal 1 binary64) a) (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))
(/.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a) b) (.f64 (.f64 a b) #s(literal 4 binary64)))
(/.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a) (.f64 (.f64 a b) #s(literal 4 binary64))) b)
(/.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a) (.f64 b (.f64 a b))) #s(literal 4 binary64))
(pow.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))) (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (*.f64 a (/.f64 b x-scale)))) a)) #s(literal -1 binary64))
(.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (/.f64 (/.f64 #s(literal 1 binary64) a) (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) (.f64 b (.f64 a (.f64 (*.f64 a b) #s(literal 4 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 b (.f64 (*.f64 a b) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) a))))
(.f64 (/.f64 (/.f64 #s(literal 1 binary64) a) (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))))
(.f64 (/.f64 (/.f64 #s(literal 1 binary64) a) (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) #s(literal -1 binary64)))
(.f64 (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a) (/.f64 #s(literal 1 binary64) (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) a) (pow.f64 (/.f64 (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64))) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 a b)) (pow.f64 (/.f64 (.f64 (.f64 a b) #s(literal 4 binary64)) (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 b (.f64 (.f64 a b) #s(literal 4 binary64)))) (/.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64)))))) (/.f64 y-scale (.f64 a (/.f64 b x-scale)))) a))
(.f64 (pow.f64 (/.f64 (.f64 b (.f64 a (.f64 (.f64 a b) #s(literal 4 binary64)))) (sqrt.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) y-scale) (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale #s(literal 2 binary64)))) (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))))) (.f64 (.f64 a b) (.f64 a (.f64 b #s(literal 8 binary64))))))) #s(literal -1 binary64)) (/.f64 (.f64 a b) (.f64 x-scale y-scale)))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b (.f64 x-scale y-scale))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b (.f64 x-scale y-scale))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (-.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 #s(literal 1/4 binary64) (.f64 x-scale b))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 #s(literal 1/4 binary64) (*.f64 x-scale b))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale b)) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 (-.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b (.f64 x-scale y-scale))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 1/4 binary64))
(.f64 (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b (*.f64 x-scale y-scale))))
(.f64 (.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (pow.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 x-scale b))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b (.f64 x-scale y-scale))))
(.f64 b (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 #s(literal 1/4 binary64) x-scale)))
(.f64 (.f64 x-scale b) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 1/4 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 #s(literal 1/4 binary64) (.f64 x-scale b)))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b (.f64 x-scale y-scale))) #s(literal 1/4 binary64))
(.f64 (.f64 b (.f64 x-scale y-scale)) (.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64)))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale b)) (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale y-scale)))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (.f64 x-scale b))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale y-scale))) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale b)) (sqrt.f64 #s(literal 8 binary64))) y-scale)
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale b)) y-scale) (sqrt.f64 #s(literal 8 binary64)))
(.f64 x-scale (.f64 b (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 b (*.f64 x-scale y-scale)))
(.f64 b (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 x-scale y-scale)))
(.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 x-scale b)))
(.f64 (.f64 x-scale b) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (*.f64 x-scale b))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 x-scale y-scale)) b)
(.f64 (.f64 b (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 b (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) x-scale)
(.f64 (.f64 (*.f64 x-scale b) (sqrt.f64 #s(literal 8 binary64))) y-scale)
(.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) b) x-scale)
(*.f64 x-scale b)
(*.f64 b x-scale)
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale))))))))))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale)))))))))
(.f64 (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale)))))))) (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))))
(.f64 (.f64 #s(literal 1/4 binary64) x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale))))))))))
(.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale))))))))) #s(literal 1/4 binary64))
(.f64 (.f64 (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale)))))))) #s(literal 1/4 binary64)) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(.f64 (.f64 (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale)))))))) (.f64 #s(literal 1/4 binary64) x-scale)) (sqrt.f64 #s(literal 8 binary64)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64)))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 #s(literal 1/4 binary64) x-scale))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/4 binary64) x-scale) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) x-scale)
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 8 binary64))
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (*.f64 x-scale x-scale))))))))))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (*.f64 x-scale x-scale)))))))))
(.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 #s(literal 1/4 binary64) x-scale)) (sqrt.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (*.f64 x-scale x-scale))))))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale))))))) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (*.f64 #s(literal 1/4 binary64) x-scale)))
(.f64 (.f64 #s(literal 1/4 binary64) x-scale) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (*.f64 x-scale x-scale)))))))))
(.f64 (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (*.f64 x-scale x-scale))))))))) #s(literal 1/4 binary64))
(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale))))))) #s(literal 1/4 binary64)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 x-scale y-scale)))
(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (.f64 x-scale x-scale))))))) (.f64 #s(literal 1/4 binary64) x-scale)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 x-scale y-scale)))
(.f64 x-scale (.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 1/4 binary64)))
(.f64 (.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (*.f64 #s(literal 1/4 binary64) x-scale))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) y-scale)
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 x-scale y-scale)) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/4 binary64) x-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) x-scale)
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) x-scale) y-scale) (sqrt.f64 #s(literal 8 binary64)))
(.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale y-scale))
(.f64 y-scale (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(.f64 (.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) x-scale)
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) y-scale)
(*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(log.f64 (+.f64 #s(literal 1 binary64) (expm1.f64 (PI.f64))))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/3 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(-.f64 (exp.f64 (log1p.f64 (PI.f64))) #s(literal 1 binary64))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))
(expm1.f64 (log1p.f64 (PI.f64)))
(log1p.f64 (expm1.f64 (PI.f64)))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (exp.f64 #s(literal 1 binary64))))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(.f64 (cbrt.f64 (PI.f64)) (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))
(.f64 (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/3 binary64)) (cbrt.f64 (PI.f64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/3 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (sqrt.f64 (PI.f64))) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (cbrt.f64 (PI.f64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (PI.f64))) #s(literal 2 binary64)))
(+.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) (+.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))))
(+.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) (fma.f64 (neg.f64 (exp.f64 (log.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))))) (exp.f64 (log.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))))
(cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (*.f64 angle (PI.f64)))))
(cos.f64 (+.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))) (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))
(fma.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))))) (exp.f64 (log.f64 (cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (*.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))))
(cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))
(cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64))))
(cos.f64 (/.f64 (-.f64 #s(literal 0 binary64) angle) (/.f64 #s(literal 180 binary64) (PI.f64))))
(sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))
(neg.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 #s(literal 0 binary64) angle) (/.f64 #s(literal 180 binary64) (PI.f64)))))
(cos.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))
(cos.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64))))
(cos.f64 (/.f64 (-.f64 #s(literal 0 binary64) angle) (/.f64 #s(literal 180 binary64) (PI.f64))))
(sin.f64 (/.f64 angle (/.f64 #s(literal 180 binary64) (PI.f64))))
(neg.f64 (sin.f64 (/.f64 angle (/.f64 #s(literal -180 binary64) (PI.f64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 #s(literal 0 binary64) angle) (/.f64 #s(literal 180 binary64) (PI.f64)))))

simplify2.1s (3%)

Algorithm

1×	egg-herbie

Rules

8408×	`-lowering-.f32`
8408×	`-lowering-.f64`
2770×	`/-lowering-/.f32`
2770×	`/-lowering-/.f64`
2700×	`+-lowering-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2750	255987
0	8026	255987

Stop Event

1×	iter limit
1×	node limit

Counts

660 → 660

Calls

Call 1

Inputs
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))
(* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (+ (* 1/2 (/ (* (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))
(* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(+ (* 1/8 (* (* (pow a 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(* 1/4 (* (* a (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))
(* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(* -1/4 (* (* a (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))
(* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale))
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale)))
(+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))))))
(+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (+ (* 1/2 (/ (* (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(+ (* 1/8 (* (* (pow b 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(* 1/4 (* (* b (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))
(* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(* -1/4 (* (* b (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(+ (* -1/16 (* (/ (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))))
(* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) y-scale)
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) y-scale)
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) y-scale)
(* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) y-scale))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) y-scale))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))) y-scale))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(+ (* -1/16 (* (/ (* (pow x-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))))
(* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) x-scale)
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) x-scale)
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) x-scale)
(* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) x-scale))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) x-scale))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))) x-scale))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(+ (* 1/8 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(* 1/4 (* (/ (* a (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))
(* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(* -1/4 (* (/ (* a (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))
(* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2))))
(+ (* 1/8 (/ (* (pow angle 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (* x-scale (sqrt 2))))) (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2)))))
(+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (* a (* x-scale (sqrt 2))))) (* 1/8 (/ (* (pow angle 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (* x-scale (sqrt 2))))))))
(+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (* a (* x-scale (sqrt 2))))) (* (pow angle 2) (+ (* 1/8 (/ (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (* x-scale (sqrt 2))))) (* 1/8 (/ (* (pow angle 2) (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (+ (* 1/2 (/ (* (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (* x-scale (sqrt 2))))))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(+ (* 1/8 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(* 1/4 (* (/ (* b (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))
(* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(* -1/4 (* (/ (* b (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(/ (+ (* -1/16 (* (/ (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* x-scale (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) y-scale)
(/ (+ (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) x-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* x-scale (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) y-scale)
(/ (+ (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* x-scale (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) x-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) x-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))) y-scale)
(* 1/4 (* (/ (sqrt 8) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (pow y-scale 2))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 2))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 2))
(* 1/4 (* (/ (sqrt 8) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (pow y-scale 2))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 2))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 2))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(/ (+ (* -1/16 (* (/ (* (pow x-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) x-scale)
(/ (+ (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) y-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) x-scale)
(/ (+ (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) y-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) y-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))) x-scale)
(* 1/4 (* (/ (sqrt 8) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (pow x-scale 2))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 2))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 2))
(* 1/4 (* (/ (sqrt 8) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (pow x-scale 2))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 2))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 2))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* x-scale (+ (* -1/16 (* (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(* x-scale (+ (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* -1/16 (* (/ (* b (* y-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))
(* x-scale (+ (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* b (* y-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* -1/8 (* (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(+ (* -1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
(+ (* -1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(+ (* -1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(+ (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(+ (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
(+ (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* y-scale (+ (* -1/16 (* (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(* y-scale (+ (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* -1/16 (* (/ (* b (* x-scale (* (sqrt 8) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))
(* y-scale (+ (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* b (* x-scale (* (sqrt 8) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* -1/8 (* (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))
(* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(+ (* -1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
(+ (* -1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(+ (* -1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
(* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(+ (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(+ (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
(+ (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))
(* 1/4 (* (* angle (* b (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
(* angle (+ (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -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/4 (/ (pow (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
(* angle (+ (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -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/4 (/ (pow (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow y-scale 2))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow y-scale 2))) (+ (* 1/22216240521216000000000 (/ (pow (PI) 8) (pow x-scale 2))) (+ (* 1/793437161472000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/634749729177600000000 (/ (pow (PI) 8) (pow x-scale 2))))))) (+ (* 1/2 (* (pow x-scale 2) (- (+ (* 1/11108120260608000000000 (/ (pow (PI) 8) (pow x-scale 4))) (+ (* 1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 4))) (+ (* 1/317374864588800000000 (/ (pow (PI) 8) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 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))))))) (+ (* 4 (+ (* -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))))))))) (pow (- (+ (* 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)))) 2)))))) (+ (* -1/198359290368000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/1388515032576000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/4 (* (pow x-scale 4) (pow (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2))))) 2))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))))))))))) (* 1/2 (/ (* (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (- (+ (* -1/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/4 (/ (pow (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))))))) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b (* x-scale (* y-scale (sqrt 8))))
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* b x-scale)
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))) (* a (sqrt 2)))) (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) 2) (* (pow a 2) (pow (sqrt 2) 2)))))))) (* a (sqrt 2)))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) 2) (* (pow a 2) (pow (sqrt 2) 2))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (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)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow a 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (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) (+ (* (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 x-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-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))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (pow b 2))) (+ (/ (* (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 x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2)))))) (pow b 2)) (/ (* (pow x-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))) (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 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)))))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) 2) (* (pow a 2) (pow (sqrt 2) 2)))))) (* (pow a 2) (pow (sqrt 2) 2)))))))) (* a (sqrt 2)))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))
(* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 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)))) (* (pow b 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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)))))))) (* b (sqrt 2)))))))
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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)))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (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)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow a 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (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) (+ (* (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 x-scale 2))))) (pow a 2))) (* 4 (/ (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-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))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (pow a 2)) (/ (* (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2)))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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/2 (/ (* (pow x-scale 2) (* (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* x-scale (* y-scale (sqrt 8)))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
(* y-scale (sqrt 8))
1
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 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)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* 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))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 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)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* 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))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))

Outputs
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/90 (* angle (PI)))
(.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 (.f64 a a) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (.f64 #s(literal -1/8 binary64) (+.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (.f64 (.f64 (.f64 a a) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))
(.f64 a (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))
(* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))
(* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale)))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))))
(+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 angle angle) x-scale) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))
(+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 angle angle) x-scale) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (*.f64 a (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (+ (* 1/2 (/ (* (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2)))))))))
(+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 angle angle) (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/765275040000000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/765275040000000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale))))) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/765275040000000 binary64) (/.f64 (.f64 (.f64 b b) (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) (+.f64 (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (.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))) (+.f64 (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 (-.f64 (.f64 b b) (.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 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))))) (*.f64 a (sqrt.f64 #s(literal 2 binary64))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (.f64 b b) (.f64 #s(literal -1/8 binary64) (+.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))
(.f64 b (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))
(* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(.f64 b (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))))))))
(* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(.f64 b (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))))
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))
(* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))
(.f64 y-scale (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))))
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))
(.f64 y-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))))
(.f64 y-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))) (.f64 (.f64 y-scale y-scale) (.f64 #s(literal -1/8 binary64) (+.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (.f64 x-scale (.f64 (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))
(+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))
(+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))
(+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))
(+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))
(* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))
(.f64 x-scale (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))))
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))
(.f64 x-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))))) (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))))))
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))))
(.f64 x-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal -1/8 binary64) (+.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))
(+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))
(+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))
(+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))
(+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))))
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(+ (* 1/8 (* (* (pow a 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (.f64 a a) (.f64 #s(literal -1/8 binary64) (+.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))))
(* 1/4 (* (* a (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))
(* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))
(.f64 a (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))
(* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))
(* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))))))
(* -1/4 (* (* a (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 a (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))
(* -1 (* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale)))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (pow a 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (pow a 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (pow a 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))))
(* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (*.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) y-scale)
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale)))
(+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) y-scale))
(+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))))))
(+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) y-scale)) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (+ (* 1/2 (/ (* (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* a (sqrt 2)))))))))
(+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/765275040000000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/765275040000000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale))))) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/765275040000000 binary64) (/.f64 (.f64 (.f64 b b) (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) (+.f64 (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (.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))) (+.f64 (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 (-.f64 (.f64 b b) (.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 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64))))))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(+ (* 1/8 (* (* (pow b 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 (.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 (.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 (.f64 b b) (.f64 #s(literal -1/8 binary64) (+.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (.f64 (.f64 (.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))))
(* 1/4 (* (* b (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))
(* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))
(.f64 b (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))
(* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(.f64 b (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))))))))
(* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(.f64 b (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))))
(* -1/4 (* (* b (sqrt 8)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))
(* -1 (* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (pow b 6)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (pow b 4)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))))))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))
(+ (* -1/16 (* (/ (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))
(+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))) (.f64 (.f64 y-scale y-scale) (.f64 #s(literal -1/8 binary64) (+.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (.f64 (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))))))))
(* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) y-scale)
(/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) y-scale)
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) y-scale)
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)))))))))) y-scale)
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) y-scale)
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))))) y-scale)
(* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) y-scale))
(neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))) y-scale))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) y-scale))
(neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))))) y-scale))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))))) y-scale))
(neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64))))))) y-scale))
(* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))
(+ (* -1/16 (* (/ (* (pow x-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))
(+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))))
(+ (* 1/4 (* (sqrt 8) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal -1/8 binary64) (+.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))))))))))
(* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) x-scale)
(/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) x-scale)
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) x-scale)
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) x-scale)
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) x-scale)
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))) x-scale)
(* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) x-scale))
(neg.f64 (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) x-scale))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) x-scale))
(neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) x-scale))
(* -1 (/ (+ (* -1/4 (* (sqrt 8) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))) (+ (* 1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))))) x-scale))
(neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) x-scale))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(+ (* 1/8 (* (/ (* (pow a 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 x-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 x-scale y-scale))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 x-scale y-scale))))))
(+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow a 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 x-scale y-scale))) (.f64 (.f64 a a) (.f64 #s(literal -1/8 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 x-scale y-scale)) (/.f64 (.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale))))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 x-scale y-scale))))))))
(* 1/4 (* (/ (* a (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (sqrt.f64 #s(literal 8 binary64))) (.f64 x-scale y-scale))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))
(* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))
(.f64 a (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (.f64 (.f64 a a) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))
(* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (.f64 (.f64 a a) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)))))))))
(* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(.f64 a (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (.f64 (.f64 a a) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))))))
(* -1/4 (* (/ (* a (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 a (sqrt.f64 #s(literal 8 binary64))) (.f64 x-scale y-scale))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))
(* -1 (* a (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (.f64 (.f64 a a) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (.f64 (.f64 a a) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale)))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)) 3))))))) (* (pow a 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow a 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))) (* (pow a 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale)))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 a #s(literal 6 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale x-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 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(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 #s(literal 2 binary64) (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))))))) (.f64 (.f64 (.f64 a a) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))))))
(* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2))))
(/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (.f64 x-scale (*.f64 y-scale y-scale)))
(+ (* 1/8 (/ (* (pow angle 2) (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (* x-scale (sqrt 2))))) (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2)))))
(+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 angle angle) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (.f64 x-scale (.f64 y-scale y-scale))))
(+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (* a (* x-scale (sqrt 2))))) (* 1/8 (/ (* (pow angle 2) (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (* x-scale (sqrt 2))))))))
(+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (.f64 x-scale (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 angle angle) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))))))))
(+ (* 1/4 (/ (* a (* (sqrt 2) (sqrt 8))) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (sqrt 8) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (* a (* x-scale (sqrt 2))))) (* (pow angle 2) (+ (* 1/8 (/ (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) (* a (* x-scale (sqrt 2))))) (* 1/8 (/ (* (pow angle 2) (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (+ (* 1/2 (/ (* (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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))))) (+ (* 1/4 (/ (* (pow y-scale 2) (pow (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2)) (* (pow a 2) (pow (sqrt 2) 2)))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* (pow a 2) (pow (sqrt 2) 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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))))) (+ (* 2 (* (- (+ (* -1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow x-scale 2))) (* 1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow x-scale 2)))) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (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))) (* 1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow x-scale 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (* a (* x-scale (sqrt 2))))))))))
(+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (.f64 x-scale (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 2 binary64))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 angle angle) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/765275040000000 binary64) (+.f64 (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (+.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale))))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale))))) (.f64 #s(literal 1/32400 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/765275040000000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale))))) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (.f64 #s(literal 1/765275040000000 binary64) (/.f64 (.f64 (.f64 b b) (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) (+.f64 (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (.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))) (+.f64 (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 (-.f64 (.f64 b b) (.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 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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(literal -1/787320000 binary64))) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))) (.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))))) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 2 binary64)))))))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.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 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (-.f64 (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(+ (* 1/8 (* (/ (* (pow b 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))
(+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 x-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))
(+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 x-scale y-scale))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 x-scale y-scale))))))
(+ (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* (pow b 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (* -1/8 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) 3)))))))) (* x-scale y-scale)) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 x-scale y-scale))) (.f64 (.f64 b b) (.f64 #s(literal -1/8 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 x-scale y-scale)) (/.f64 (.f64 (.f64 (.f64 (.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (/.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 x-scale y-scale))))))))
(* 1/4 (* (/ (* b (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 b (sqrt.f64 #s(literal 8 binary64))) (.f64 x-scale y-scale))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))
(* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))
(.f64 b (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 (.f64 b b) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))
(* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(.f64 b (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 (.f64 b b) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))))))))
(* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(.f64 b (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 (.f64 b b) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))))))))
(* -1/4 (* (/ (* b (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))
(.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 b (sqrt.f64 #s(literal 8 binary64))) (.f64 x-scale y-scale))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))
(* -1 (* b (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 (.f64 b b) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 (.f64 b b) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (* (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (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) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)) 3))))))) (* (pow b 6) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* 1/4 (/ (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow b 4) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (sqrt 8) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) (* (pow b 2) (* x-scale y-scale))) (sqrt (/ 1 (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))))))) (* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))) #s(literal 3 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (pow.f64 b #s(literal 6 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 x-scale y-scale)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))) (.f64 (.f64 (.f64 b b) x-scale) y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale x-scale))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))))))))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))
(/ (+ (* -1/16 (* (/ (* (pow y-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* x-scale (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) y-scale)
(/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (.f64 x-scale (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) y-scale)
(/ (+ (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) x-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* x-scale (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) y-scale)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) x-scale)) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (.f64 x-scale (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) y-scale)
(/ (+ (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* x-scale (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) x-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (/ (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) x-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))) y-scale)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (.f64 x-scale (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))) (.f64 (.f64 y-scale y-scale) (.f64 #s(literal -1/8 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) x-scale) (/.f64 (.f64 (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))) x-scale))))))) y-scale)
(* 1/4 (* (/ (sqrt 8) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale (.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (pow y-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (*.f64 y-scale y-scale))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))))) (.f64 y-scale y-scale))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (*.f64 y-scale y-scale))
(* 1/4 (* (/ (sqrt 8) (* x-scale (pow y-scale 2))) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale (.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (pow y-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (*.f64 y-scale y-scale))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (pow y-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))))) (.f64 y-scale y-scale))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 6))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))))))))) (* x-scale (pow y-scale 4))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))) (* x-scale (* (pow y-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) x-scale) (sqrt (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))))))))) (pow y-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))) (.f64 (.f64 x-scale (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))))))))) (*.f64 y-scale y-scale))
(* 1/4 (* (/ (sqrt 8) (* x-scale y-scale)) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))
(/ (+ (* -1/16 (* (/ (* (pow x-scale 2) (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) x-scale)
(/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (.f64 y-scale (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) x-scale)
(/ (+ (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) y-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))) x-scale)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) y-scale)) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (.f64 y-scale (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) x-scale)
(/ (+ (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* y-scale (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))) y-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (* -1/8 (* (/ (* (pow x-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 3))) (* 1/16 (/ (pow (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))) 2) (* (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) y-scale) (sqrt (/ 1 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))))) x-scale)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))))))))) (.f64 y-scale (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal -1/8 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) y-scale) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 3 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64))))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))) y-scale))))))) x-scale)
(* 1/4 (* (/ (sqrt 8) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (.f64 x-scale x-scale) y-scale))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (pow x-scale 2))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 x-scale x-scale) y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (*.f64 x-scale x-scale))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) y-scale))) (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 x-scale x-scale) y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (.f64 x-scale x-scale))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) y-scale))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) y-scale))) (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 x-scale x-scale) y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))))) (*.f64 x-scale x-scale))
(* 1/4 (* (/ (sqrt 8) (* (pow x-scale 2) y-scale)) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (.f64 x-scale x-scale) y-scale))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))
(/ (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (pow x-scale 2))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 x-scale x-scale) y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (*.f64 x-scale x-scale))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (pow x-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) y-scale))) (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 x-scale x-scale) y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (.f64 x-scale x-scale))
(/ (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 6) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/8 (* (/ (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 3))) (* 1/16 (/ (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))))))) (* (pow x-scale 4) y-scale)) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* -1/16 (* (/ (* (sqrt 8) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* y-scale (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (sqrt (/ 1 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 1/4 (* (/ (sqrt 8) y-scale) (sqrt (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))))) (pow x-scale 2))
(/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) y-scale))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) y-scale))) (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (.f64 (.f64 (.f64 x-scale x-scale) y-scale) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))))))))) (*.f64 x-scale x-scale))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* x-scale (+ (* -1/16 (* (/ (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(.f64 x-scale (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 b (.f64 x-scale x-scale)) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.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 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
(* x-scale (+ (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* -1/16 (* (/ (* b (* y-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))
(.f64 x-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 b (.f64 x-scale x-scale)) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.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 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.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 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(* x-scale (+ (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* b (* y-scale (* (sqrt 8) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* -1/8 (* (* b (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))
(.f64 x-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.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 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal -1/8 binary64) (+.f64 (.f64 b (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.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 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (.f64 (.f64 (.f64 b (.f64 x-scale x-scale)) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.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 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.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 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(+ (* -1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
(+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 y-scale (.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(+ (* -1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 y-scale (.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
(+ (* -1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 y-scale (.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(+ (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 y-scale (.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
(+ (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
(+.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 y-scale (.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 4 binary64)))))
(+ (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow y-scale 3) (* (sqrt 8) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (pow (cos (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
(+.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 y-scale (.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 b (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 #s(literal 1/4 binary64) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (.f64 (.f64 b (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 4 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
(* y-scale (+ (* -1/16 (* (/ (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(.f64 y-scale (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 (.f64 b x-scale) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(* y-scale (+ (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* -1/16 (* (/ (* b (* x-scale (* (sqrt 8) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))
(.f64 y-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 b x-scale) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(* y-scale (+ (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* b (* x-scale (* (sqrt 8) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* -1/8 (* (* b (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))
(.f64 y-scale (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (.f64 #s(literal -1/8 binary64) (+.f64 (.f64 b (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 (.f64 (.f64 b x-scale) (.f64 (.f64 (.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))
(* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
(+ (* -1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
(+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 x-scale (.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(+ (* -1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 x-scale (.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(+ (* -1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* -1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
(+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 #s(literal 1/4 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 x-scale (.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
(* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
(+ (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 x-scale (.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
(+ (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
(+.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 x-scale (.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64)))))
(+ (* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/16 (* (/ (* b (* (pow x-scale 3) (* (sqrt 8) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 6)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* 1/8 (* (/ (* b (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))) 2)) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))
(+.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 b (.f64 (.f64 (.f64 x-scale (.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (sqrt.f64 (/.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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 b (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 #s(literal 1/4 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (.f64 (.f64 b (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (.f64 (pow.f64 (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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))))
(* 1/4 (* (* angle (* b (* x-scale (* y-scale (sqrt 8))))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 angle (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 (.f64 b x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(* angle (+ (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -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/4 (/ (pow (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))
(.f64 angle (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (.f64 (.f64 (.f64 b x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 angle angle) (.f64 (.f64 (.f64 b x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) #s(literal 1/765275040000000 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64)) (.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) (+.f64 (/.f64 (.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (+.f64 (/.f64 (.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))) (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/1020366720000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/612220032000000 binary64) (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 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))))))
(* angle (+ (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -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/4 (/ (pow (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2))))))))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))))) (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow y-scale 2))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow y-scale 2))) (+ (* 1/22216240521216000000000 (/ (pow (PI) 8) (pow x-scale 2))) (+ (* 1/793437161472000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/634749729177600000000 (/ (pow (PI) 8) (pow x-scale 2))))))) (+ (* 1/2 (* (pow x-scale 2) (- (+ (* 1/11108120260608000000000 (/ (pow (PI) 8) (pow x-scale 4))) (+ (* 1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 4))) (+ (* 1/317374864588800000000 (/ (pow (PI) 8) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 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))))))) (+ (* 4 (+ (* -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))))))))) (pow (- (+ (* 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)))) 2)))))) (+ (* -1/198359290368000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1/1388515032576000000000 (/ (pow (PI) 8) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/4 (* (pow x-scale 4) (pow (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2))))) 2))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))))))))))) (* 1/2 (/ (* (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) (- (+ (* -1/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/4 (/ (pow (- (+ (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (* 1/2 (* (pow x-scale 2) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))) 2) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 4 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 4) (* (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 4 (+ (* -1/1049760000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (+ (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (* (pow x-scale 4) (pow (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2)))))))))))))))) (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))) (sqrt (/ 1 (- (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (* 1/2 (* (pow x-scale 2) (- (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))))))))))))))
(.f64 angle (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 b x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (.f64 (.f64 (.f64 b x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) #s(literal 1/765275040000000 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64)) (.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) (+.f64 (/.f64 (.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (+.f64 (/.f64 (.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))) (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/1020366720000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/612220032000000 binary64) (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 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 angle angle) (.f64 (.f64 (.f64 b x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 #s(literal 1/22216240521216000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 x-scale x-scale)) #s(literal 1/352638738432000000000 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/11108120260608000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/317374864588800000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 (.f64 #s(literal 2 binary64) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) #s(literal 1/765275040000000 binary64))))) (+.f64 (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (pow.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64)) (.f64 #s(literal 1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal -1/198359290368000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/1388515032576000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64)) (.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) (+.f64 (/.f64 (.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (+.f64 (/.f64 (.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))) (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/1020366720000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/612220032000000 binary64) (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 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))))) (/.f64 (.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (-.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) #s(literal 1/765275040000000 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64)) (.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) (+.f64 (/.f64 (.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (+.f64 (/.f64 (.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))) (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/1020366720000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/612220032000000 binary64) (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 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/6298560000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (.f64 #s(literal 1/2099520000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (.f64 (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 #s(literal -1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b (* x-scale (* y-scale (sqrt 8))))
(.f64 b (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* b x-scale)
(*.f64 b x-scale)
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (.f64 #s(literal 1/8 binary64) (+.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* (pow a 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 (cos (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -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 x-scale 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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 #s(literal 1/8 binary64) (+.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 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 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 b b) (pow.f64 (cos.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 2 binary64)))) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 a (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
(.f64 a (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 a a))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(.f64 a (+.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 a a))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 6 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 a a))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-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 (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (* -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 x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (/ (* (pow b 2) (* (pow x-scale 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 a a))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 a #s(literal 6 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))))
(+ (* 1/8 (/ (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))))) (* a (sqrt 2)))) (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))))
(+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) 2) (* (pow a 2) (pow (sqrt 2) 2)))))))) (* a (sqrt 2)))))))
(+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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 x-scale x-scale)) #s(literal -1/787320000 binary64))))) (.f64 b b)) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))))) (.f64 b b))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (.f64 b b)))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))))) (* a (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* x-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) 2) (* (pow a 2) (pow (sqrt 2) 2))))))) (* a (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (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)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow a 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (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) (+ (* (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 x-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-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))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-scale 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (pow b 2))) (+ (/ (* (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 x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2)))))) (pow b 2)) (/ (* (pow x-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))) (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 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)))))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (- (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))))) (pow b 2)) (+ (* -2 (/ (* (pow a 2) (* (pow x-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))))) (pow b 2))) (/ (* (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 x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2)))))) (pow b 2))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))))) (pow b 2)) (* -2 (/ (* (pow a 2) (* (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 b 2))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) 2) (* (pow a 2) (pow (sqrt 2) 2)))))) (* (pow a 2) (pow (sqrt 2) 2)))))))) (* a (sqrt 2)))))))))
(+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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 x-scale x-scale)) #s(literal -1/787320000 binary64))))) (.f64 b b)) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))))) (.f64 b b))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (.f64 b b)))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (.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 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale x-scale))))))) (.f64 b b)) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 x-scale x-scale))))) (.f64 b b))) (+.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (-.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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 x-scale x-scale)) #s(literal -1/787320000 binary64))))) (.f64 b b)) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))))) (.f64 b b))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (.f64 b b)))) (.f64 b b)) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (.f64 b b))))) (-.f64 (+.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 x-scale x-scale))))) (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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 x-scale x-scale)) #s(literal -1/787320000 binary64))))) (.f64 b b)) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))))) (.f64 b b))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (.f64 b b)))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)))) (.f64 b b)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (.f64 b b))))) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (.f64 a (sqrt.f64 #s(literal 2 binary64))))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 b b) (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 (.f64 b b) (.f64 #s(literal 1/8 binary64) (+.f64 (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (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) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 #s(literal 1/8 binary64) (+.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (.f64 (.f64 b b) (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 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 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 a a) (pow.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 2 binary64)))) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))
(* 1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
(.f64 b (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
(.f64 b (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 b b))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(.f64 b (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 b b))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (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 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 6 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
(* -1/4 (* (* b (* x-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 b b))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow x-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -2 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (* (pow a 2) (* (pow x-scale 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 b b))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (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 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (pow.f64 b #s(literal 6 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))
(+ (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 (.f64 a a) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (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 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (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 #s(literal 1/8 binary64) (+.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (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 a a) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.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 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 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)))) (* (pow b 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) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow a 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 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)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (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 (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (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 #s(literal 1/8 binary64) (+.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.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 2 binary64)) (.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (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 a a) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 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 2 binary64)) (-.f64 (.f64 (/.f64 (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 x-scale))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (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 x-scale))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(.f64 a (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
(.f64 a (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 a a))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 a #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))
(* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
(.f64 a (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 a a))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (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 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 a a))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 a #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
(.f64 (.f64 #s(literal -1 binary64) a) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 a a))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 a #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (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 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 b b) (pow.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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 b b) (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 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 a #s(literal 6 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))
(+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 angle angle) (.f64 x-scale x-scale)) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))))))) (.f64 b (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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)))))))) (* b (sqrt 2)))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 (.f64 angle angle) (.f64 x-scale x-scale)) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 x-scale x-scale))))) (.f64 a a)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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 x-scale x-scale)) #s(literal -1/787320000 binary64))) (.f64 a a))) (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 a a)))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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)))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (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)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow a 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (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) (+ (* (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 x-scale 2))))) (pow a 2))) (* 4 (/ (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-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))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (pow a 2)) (/ (* (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2)))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (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/2 (/ (* (pow x-scale 2) (* (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -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) (+ (* -1/3149280000 (/ (* (pow a 2) (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) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 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) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -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 a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (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))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))))))) (.f64 b (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 (.f64 angle angle) (.f64 x-scale x-scale)) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))))) (.f64 x-scale x-scale))))) (.f64 a a)) (/.f64 (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (.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 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale x-scale))))) (.f64 a a))) (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (/.f64 (+.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 x-scale x-scale))))) (.f64 a a)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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 x-scale x-scale)) #s(literal -1/787320000 binary64))) (.f64 a a))) (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 a a)))) (.f64 a a)) (/.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 a a))))) (-.f64 (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 x-scale x-scale))))) (.f64 a a)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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 x-scale x-scale)) #s(literal -1/787320000 binary64))) (.f64 a a))) (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 a a)))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (.f64 (.f64 b b) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (.f64 b (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 x-scale x-scale))))) (.f64 a a)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (/.f64 (.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 x-scale x-scale)) #s(literal -1/787320000 binary64))) (.f64 a a))) (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (/.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (.f64 a a)))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64))))) (.f64 x-scale x-scale)))) (.f64 a a)) (-.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 b b)) (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))) (.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (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 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale)))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (pow.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 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))
(+ (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
(+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.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 #s(literal 1/8 binary64) (+.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.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 b b) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow b 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* (pow b 2) (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 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) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-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 a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.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 (.f64 #s(literal 1/8 binary64) (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.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 #s(literal 1/8 binary64) (+.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.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 b b) x-scale) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 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 2 binary64)) (-.f64 (.f64 (/.f64 (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 x-scale))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (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 x-scale))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 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(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (/.f64 (pow.f64 (cos.f64 (.f64 #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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.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(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
(.f64 b (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
(.f64 b (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 b b))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))
(* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
(.f64 b (+.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 b b))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 b #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 b #s(literal 6 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))))
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 b b))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 b b))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 4)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 6)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))))
(.f64 (.f64 #s(literal -1 binary64) b) (+.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 b b))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 b #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 a a) (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 #s(literal -2 binary64) (+.f64 (/.f64 (.f64 (.f64 a a) (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 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (pow.f64 b #s(literal 6 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (* y-scale (sqrt 8)))
(.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 8))
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/16200 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/382637520000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 #s(literal 1/1574640000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/64800 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/64800 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 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)))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/64800 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/24488801280000000 binary64) (.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))))))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(* 1/180 (* angle (PI)))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(.f64 angle (+.f64 (.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 angle angle)) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/180 binary64) (PI.f64)) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 #s(literal 1/22674816000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 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))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/180 binary64) (PI.f64)) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/30855889612800000000 binary64) (.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)))))))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/64800 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/64800 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 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)))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/64800 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/24488801280000000 binary64) (.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))))))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(* 1/180 (* angle (PI)))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(.f64 angle (+.f64 (.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 angle angle)) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/180 binary64) (PI.f64)) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 #s(literal 1/22674816000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 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))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/180 binary64) (PI.f64)) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/30855889612800000000 binary64) (.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)))))))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))

eval901.0ms (1.3%)

Compiler: Compiled 694276 to 16214 computations (97.7% saved)

prune701.0ms (1%)

Pruning

28 alts after pruning (27 fresh and 1 done)

	Pruned	Kept	Total
New	2780	25	2805
Fresh	7	2	9
Picked	4	1	5
Done	0	0	0
Total	2791	28	2819

Accuracy

68.0%

Counts

2819 → 28

Alt Table

Click to see full alt table

Status	Accuracy	Program
	29.2%	(.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (*.f64 x-scale y-scale))
	15.8%	(.f64 (.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (.f64 x-scale (.f64 y-scale y-scale))) (.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
	4.9%	(.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))))))) (.f64 x-scale y-scale)) (.f64 x-scale y-scale))
	34.5%	(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64))
	9.0%	(.f64 (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 (+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))) #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 180 binary64) (.f64 angle (PI.f64))))) #s(literal -1/2 binary64))))))) (*.f64 x-scale x-scale))))))))) #s(literal 1/4 binary64))
	34.3%	(.f64 (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))
▶	34.5%	(.f64 (.f64 a x-scale) #s(literal 1 binary64))
	1.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	1.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	1.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	3.4%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	12.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
	2.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale))))))))
▶	3.2%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))
	4.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	4.9%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))
	3.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
▶	0.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	9.2%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
	20.0%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
	14.9%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	13.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	0.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 angle (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (+.f64 (/.f64 (.f64 #s(literal -1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 x-scale #s(literal 4 binary64))) (-.f64 (/.f64 (.f64 #s(literal 1/8100 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
	2.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (+.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale x-scale)) (/.f64 (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))))
	19.4%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
▶	10.3%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
▶	34.9%	(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
✓	34.2%	(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Compiler

Compiled 4740 to 1906 computations (59.8% saved)

simplify245.0ms (0.3%)

Algorithm

1×	egg-herbie

Localize:

Found 18 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale))))) (.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 (.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))
✓	cost-diff	256	(.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))
✓	cost-diff	6400	(+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))))))
✓	cost-diff	0	(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
✓	cost-diff	0	(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
✓	cost-diff	384	(.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))
✓	cost-diff	0	(.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
✓	cost-diff	0	(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
✓	cost-diff	384	(.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)))
✓	cost-diff	0	(*.f64 a x-scale)
✓	cost-diff	128	(.f64 (.f64 a x-scale) #s(literal 1 binary64))
✓	cost-diff	0	(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
✓	cost-diff	0	(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
✓	cost-diff	0	(*.f64 #s(literal 1/4 binary64) b)
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))

Rules

4724×	`-lowering-.f32`
4724×	`-lowering-.f64`
2976×	`+-lowering-+.f64`
2976×	`+-lowering-+.f32`
2054×	`sum4-define`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	90	2144
1	291	1967
2	1210	1942
3	4939	1893
0	8120	1893

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* (* 1/4 b) (* (* y-scale (sqrt 2)) (sqrt 8)))
(* 1/4 b)
1/4
b
(* (* y-scale (sqrt 2)) (sqrt 8))
(* y-scale (sqrt 2))
y-scale
(sqrt 2)
2
(sqrt 8)
8
(* (* a x-scale) 1)
(* a x-scale)
a
x-scale
1
(* (* 1/4 (* a (* x-scale (sqrt 8)))) (sqrt (+ (/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* 1/4 (* a (* x-scale (sqrt 8))))
1/4
(* a (* x-scale (sqrt 8)))
a
(* x-scale (sqrt 8))
x-scale
(sqrt 8)
8
(sqrt (+ (/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))
(+ (/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))
(/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* -1/2 (* (* x-scale x-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)))
-1/2
(* (* x-scale x-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))
(* x-scale x-scale)
(* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)
(/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(pow (cos (* 1/180 (* angle (PI)))) 2)
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
1/180
(* angle (PI))
angle
(PI)
2
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(* (* 1/4 (* x-scale (sqrt 8))) (sqrt (+ (/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* x-scale (sqrt 8)))
1/4
(* x-scale (sqrt 8))
x-scale
(sqrt 8)
8
(sqrt (+ (/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(+ (/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)))
(/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* -1/2 (* (* x-scale x-scale) (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)))
-1/2
(* (* x-scale x-scale) (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))
(* x-scale x-scale)
(* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)
(/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))
(* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2))
(pow a 4)
a
4
(pow (cos (* 1/180 (* angle (PI)))) 2)
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
1/180
(* angle (PI))
angle
(PI)
2
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* a a)
(* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))
(* (* 1/4 (* y-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))))))
(* 1/4 (* y-scale (sqrt 8)))
1/4
(* y-scale (sqrt 8))
y-scale
(sqrt 8)
8
(sqrt (+ (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)))))))
(+ (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))))
(+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))
(* a a)
a
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))
1/2
(* -1/2 (cos (* 1/90 (* angle (PI)))))
-1/2
(cos (* 1/90 (* angle (PI))))
(* 1/90 (* angle (PI)))
1/90
(* angle (PI))
angle
(PI)
(* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))
(* b b)
b
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(* 1/2 (cos (* 1/90 (* angle (PI)))))
(* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)))))
(/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))
(+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale)))))
(* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)))))
-2
(* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))
(+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)))
(/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))
(* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))
(* y-scale y-scale)
(/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))
(* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))
(* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))
4
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale)))
(pow (cos (* 1/180 (* angle (PI)))) 2)
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
1/180
2
(/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))
(* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a))))
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(* (- (* b b) (* a a)) (- (* b b) (* a a)))
(- (* b b) (* a a))

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

localize3.9s (5.5%)

Localize:

Found 18 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (.f64 #s(literal 1/90 binary64) (.f64 angle (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	3.1%	(PI.f64)
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	3.1%	(PI.f64)
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	3.1%	(PI.f64)
✓	accuracy	100.0%	(.f64 (.f64 a x-scale) #s(literal 1 binary64))
✓	accuracy	100.0%	(*.f64 a x-scale)
✓	accuracy	100.0%	(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
✓	accuracy	100.0%	(*.f64 #s(literal 1/4 binary64) b)
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 2 binary64))

Results

3.6s

256×

exit

Compiler

Compiled 2411 to 91 computations (96.2% saved)

Precisions

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

ival-cos: 530.0ms (23% of total)

ival-sin: 515.0ms (22.3% of total)

ival-mult: 473.0ms (20.5% of total)

backward-pass: 290.0ms (12.6% of total)

ival-div: 183.0ms (7.9% of total)

...c/correct-round.rkt:119:19: 102.0ms (4.4% of total)

ival-pow: 72.0ms (3.1% of total)

ival-add: 64.0ms (2.8% of total)

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

ival-sub: 10.0ms (0.4% of total)

ival-pi: 8.0ms (0.3% of total)

const: 6.0ms (0.3% of total)

series172.0ms (0.2%)

Counts

24 → 492

Calls

Call 1

Inputs
#<alt (* (* 1/4 b) (* (* y-scale (sqrt 2)) (sqrt 8)))>
#<alt (* 1/4 b)>
#<alt (* (* y-scale (sqrt 2)) (sqrt 8))>
#<alt (* y-scale (sqrt 2))>
#<alt (* (* a x-scale) 1)>
#<alt (* a x-scale)>
#<alt (* (* x-scale x-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))>
#<alt (* (* 1/4 (* a (* x-scale (sqrt 8)))) (sqrt (+ (/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* (* x-scale x-scale) (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))>
#<alt (* (* 1/4 (* x-scale (sqrt 8))) (sqrt (+ (/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* x-scale (sqrt 8))>
#<alt (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))>
#<alt (* (* 1/4 (* y-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))))))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (sqrt 2)>
#<alt (sqrt 8)>
#<alt (PI)>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>

Outputs
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* 1/4 b)>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (* (sqrt 2) (sqrt 8)))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* y-scale (sqrt 2))>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 1/16200 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* 2 (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))>
#<alt (* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (* (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)))))))))) (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))>
#<alt (* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow angle 2) (+ (* 2 (* (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))))))))))) (* 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)))))))))))))))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* angle (* x-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))>
#<alt (* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))))>
#<alt (* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))))>
#<alt (* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/22216240521216000000000 (pow (PI) 8)) (+ (* 1/793437161472000000000 (pow (PI) 8)) (* 1/634749729177600000000 (pow (PI) 8))))) (+ (* 1/22216240521216000000000 (pow (PI) 8)) (+ (* 1/793437161472000000000 (pow (PI) 8)) (* 1/634749729177600000000 (pow (PI) 8))))) (* 1/2 (/ (* (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (- (+ (* -1 (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 1/16200 (* (pow a 4) (* (pow angle 2) (pow (PI) 2))))>
#<alt (* (pow angle 2) (+ (* 1/16200 (* (pow a 4) (pow (PI) 2))) (* 2 (* (pow a 4) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))>
#<alt (* (pow angle 2) (+ (* 1/16200 (* (pow a 4) (pow (PI) 2))) (* (pow angle 2) (+ (* 2 (* (pow a 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))))))))))) (* 2 (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))))>
#<alt (* (pow angle 2) (+ (* 1/16200 (* (pow a 4) (pow (PI) 2))) (* (pow angle 2) (+ (* 2 (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 2 (* (pow a 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)))))))))))) (* 2 (* (pow a 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))))))))))))))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2)))))>
#<alt (+ (* 1/8 (* (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2))))))>
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (+ (* -1 (pow a 2)) (pow a 2)))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))))))>
#<alt (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (+ (* -1 (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (+ (* -1 (pow a 2)) (pow a 2))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1 (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (+ (* -1 (pow a 2)) (pow a 2)))))) (+ (* -1 (pow a 2)) (pow a 2)))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))>
#<alt (* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))>
#<alt (* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))>
#<alt (* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))>
#<alt (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))>
#<alt (* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))>
#<alt (* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))>
#<alt (* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))>
#<alt (pow b 2)>
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow b 2))>
#<alt (+ (* (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/3149280000 (* (pow b 2) (pow (PI) 4)))))))) (pow b 2))>
#<alt (+ (* (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/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))))))))) (pow b 2))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))>
#<alt (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))>
#<alt (* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))>
#<alt (* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))>
#<alt (* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))>
#<alt (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))>
#<alt (* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))>
#<alt (* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))>
#<alt (* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))>
#<alt (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))>
#<alt (+ (* (pow a 2) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))>
#<alt (+ (* (pow a 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))>
#<alt (+ (* (pow a 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))>
#<alt (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))>
#<alt (* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))))))>
#<alt (* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))>
#<alt (* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))>
#<alt (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))>
#<alt (* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))))))>
#<alt (* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))>
#<alt (* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))>
#<alt (/ (* (pow a 2) (pow b 2)) (pow y-scale 2))>
#<alt (+ (* (pow angle 2) (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))>
#<alt (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))>
#<alt (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (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)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (+ (* (pow b 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow y-scale 2)))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2)))))) (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))>
#<alt (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))>
#<alt (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))>
#<alt (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))>
#<alt (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))>
#<alt (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))>
#<alt (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))>
#<alt (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))>
#<alt (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))>
#<alt (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))>
#<alt (+ (* (pow b 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))>
#<alt (+ (* (pow b 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))>
#<alt (+ (* (pow b 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))>
#<alt (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))>
#<alt (* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))))))>
#<alt (* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))>
#<alt (* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))>
#<alt (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))>
#<alt (* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))))))>
#<alt (* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))>
#<alt (* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))>
#<alt (+ (* 1/8 (* (* (pow a 2) (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow a 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow a 2) (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))>
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow a 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow a 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow a 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/2 (/ (* (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))>
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))>
#<alt (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))))>
#<alt (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))))>
#<alt (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))))))>
#<alt (* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))))))>
#<alt (* -1 (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))))))>
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))>
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))>
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2))))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))>
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2))))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) 2) (* (pow b 2) (pow (sqrt 2) 2))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (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)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (+ (* (pow b 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 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 y-scale 2))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (pow a 2))) (+ (/ (* (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 y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2)))))) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2))))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))>
#<alt (+ (* 1/8 (* (* (pow b 2) (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow b 2) (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))))>
#<alt (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow b 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/2 (/ (* (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))>
#<alt (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))>
#<alt (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))>
#<alt (* -1 (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt (* 1/4 (* y-scale (sqrt 8)))>
#<alt 1>
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))>
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))>
#<alt (+ 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)))))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (* 1/180 (* angle (PI)))>
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))>
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))>
#<alt (* 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))))))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt 1>
#<alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))>
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))>
#<alt (+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>
#<alt (cos (* 1/90 (* angle (PI))))>

Calls

123 calls:

Time	Variable		Point	Expression
12.0ms	a	@	inf	(* (* 1/4 (* y-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))))))
10.0ms	b	@	inf	(* (* 1/4 (* y-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))))))
10.0ms	a	@	0	(* (* 1/4 (* y-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))))))
9.0ms	b	@	0	(* (* 1/4 (* y-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))))))
9.0ms	angle	@	-inf	(* (* 1/4 (* y-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))))))

rewrite616.0ms (0.9%)

Algorithm

1×	batch-egg-rewrite

Rules

5234×	`/-lowering-/.f32`
5234×	`/-lowering-/.f64`
4926×	`-lowering-.f32`
4926×	`-lowering-.f64`
1182×	`+-lowering-+.f64`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	90	496
1	388	456
2	2432	444
0	8497	444

Stop Event

1×	iter limit
1×	node limit

Counts

24 → 389

Calls

Call 1

Inputs
(* (* 1/4 b) (* (* y-scale (sqrt 2)) (sqrt 8)))
(* 1/4 b)
(* (* y-scale (sqrt 2)) (sqrt 8))
(* y-scale (sqrt 2))
(* (* a x-scale) 1)
(* a x-scale)
(* (* x-scale x-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))
(* (* 1/4 (* a (* x-scale (sqrt 8)))) (sqrt (+ (/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* a (* x-scale (sqrt 8)))
(* (* x-scale x-scale) (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))
(* (* 1/4 (* x-scale (sqrt 8))) (sqrt (+ (/ (* -1/2 (* (* x-scale x-scale) (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))) (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* x-scale (sqrt 8)))
(* x-scale (sqrt 8))
(+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))
(* (* 1/4 (* y-scale (sqrt 8))) (sqrt (+ (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* -1/2 (/ (+ (* -2 (* (+ (* (* a a) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (- (* b b) (* a a)) (- (* b b) (* a a)))) (* y-scale y-scale))))) (+ (/ (* (* a a) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale)) (/ (* (* b b) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* y-scale y-scale))))))))
(* 1/4 (* y-scale (sqrt 8)))
(sqrt 2)
(sqrt 8)
(PI)
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))

Outputs
(.f64 #s(literal 1/4 binary64) (.f64 b (*.f64 y-scale #s(literal 4 binary64))))
(.f64 b (.f64 #s(literal 1/4 binary64) (*.f64 y-scale #s(literal 4 binary64))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale #s(literal 4 binary64)))
(.f64 y-scale (.f64 #s(literal 4 binary64) (*.f64 #s(literal 1/4 binary64) b)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 #s(literal 1/4 binary64) b)))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (.f64 y-scale #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) b))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 b (*.f64 y-scale #s(literal 4 binary64))) #s(literal 1/4 binary64))
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) b) y-scale) #s(literal 4 binary64))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (sqrt.f64 #s(literal 8 binary64))) (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (*.f64 y-scale #s(literal 4 binary64)) #s(literal 1/4 binary64)) b)
(*.f64 #s(literal 1/4 binary64) b)
(*.f64 b #s(literal 1/4 binary64))
(*.f64 y-scale #s(literal 4 binary64))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 4 binary64) y-scale)
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) y-scale)
(*.f64 a x-scale)
(*.f64 x-scale a)
(.f64 x-scale (.f64 a #s(literal 1 binary64)))
(.f64 (.f64 a x-scale) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (.f64 a x-scale))
(.f64 (.f64 #s(literal 1 binary64) a) x-scale)
(*.f64 a x-scale)
(*.f64 x-scale a)
(.f64 x-scale (.f64 a #s(literal 1 binary64)))
(.f64 (.f64 a x-scale) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (.f64 a x-scale))
(.f64 (.f64 #s(literal 1 binary64) a) x-scale)
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (*.f64 x-scale x-scale))))
(/.f64 (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (*.f64 x-scale x-scale))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (*.f64 x-scale x-scale))
(/.f64 (neg.f64 (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
(.f64 x-scale (.f64 (.f64 x-scale #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale))))
(.f64 (.f64 x-scale x-scale) (/.f64 #s(literal 2 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
(.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (*.f64 x-scale x-scale)))
(.f64 (/.f64 #s(literal 2 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 x-scale x-scale))
(.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal 2 binary64))
(.f64 (.f64 (.f64 x-scale #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale))) x-scale)
(.f64 (.f64 (.f64 x-scale x-scale) #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 x-scale x-scale)))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))))
(.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
(.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
(.f64 (.f64 (.f64 a x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))) #s(literal 1/4 binary64))
(.f64 (.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal 1/4 binary64)) (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(.f64 (.f64 (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 #s(literal 1/4 binary64) a)) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(.f64 a (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(.f64 (.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (*.f64 #s(literal 1/4 binary64) a))
(.f64 (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) a)
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) a) (sqrt.f64 #s(literal 8 binary64))) x-scale)
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) a) x-scale) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 a x-scale))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(.f64 x-scale (.f64 a (sqrt.f64 #s(literal 8 binary64))))
(.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) a))
(.f64 (.f64 a x-scale) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 a x-scale) (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 8 binary64))))
(.f64 #s(literal 1 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) a)
(.f64 (.f64 a (sqrt.f64 #s(literal 8 binary64))) x-scale)
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 x-scale x-scale))))
(/.f64 (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (.f64 x-scale x-scale))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 x-scale x-scale)) (.f64 x-scale x-scale))
(/.f64 (neg.f64 (.f64 (.f64 x-scale x-scale) (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 x-scale x-scale))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))))
(.f64 x-scale (.f64 x-scale (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64)))))))
(.f64 (.f64 x-scale x-scale) (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))))
(.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (.f64 x-scale x-scale)))
(.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) (.f64 x-scale x-scale))
(.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal 2 binary64))
(.f64 (.f64 x-scale (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64)))))) x-scale)
(.f64 (.f64 (.f64 x-scale x-scale) #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 x-scale x-scale)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)))) (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(.f64 (.f64 #s(literal 1/4 binary64) x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a))))))
(.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))) #s(literal 1/4 binary64))
(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)))) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)))) (*.f64 #s(literal 1/4 binary64) x-scale)) (sqrt.f64 #s(literal 8 binary64)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 #s(literal 1/4 binary64) x-scale))
(.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/4 binary64) x-scale) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) x-scale)
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(+.f64 (.f64 (.f64 a a) #s(literal 1/2 binary64)) (+.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 a a))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 b b)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 b b))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 b b))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 b b))))
(+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 a a))))
(fma.f64 b (.f64 b (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(fma.f64 b (.f64 b #s(literal 1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 b b))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(fma.f64 a (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(fma.f64 a (.f64 a #s(literal 1/2 binary64)) (+.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 a a))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(fma.f64 (.f64 a a) #s(literal 1/2 binary64) (+.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 a a))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(fma.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(fma.f64 #s(literal 1/2 binary64) (.f64 a a) (+.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 a a))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(fma.f64 #s(literal 1/2 binary64) (.f64 b b) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 b b))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 a a) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(fma.f64 (.f64 b b) #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 b b))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(fma.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(fma.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) a (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(fma.f64 (.f64 b (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) b (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) b) b (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 b b))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(fma.f64 (.f64 #s(literal 1/2 binary64) a) a (+.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 a a))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(+.f64 (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(+.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(+.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(+.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))))
(+.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))))
(fma.f64 (.f64 a a) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(fma.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b))))))
(fma.f64 (.f64 b b) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(fma.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b))))))
(fma.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(fma.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(fma.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(fma.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(fma.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(fma.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(fma.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(fma.f64 (/.f64 (.f64 b b) y-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(fma.f64 (/.f64 (.f64 a a) y-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(fma.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 a a)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 y-scale y-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(fma.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(fma.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 a a) y-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) y-scale) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(fma.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 b b)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 y-scale y-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(fma.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(fma.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 b b) y-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) y-scale) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 y-scale (.f64 y-scale (.f64 y-scale y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 y-scale (.f64 y-scale (.f64 y-scale y-scale))) (.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))
(/.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 y-scale (.f64 y-scale (.f64 y-scale y-scale))))
(/.f64 (.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale (.f64 y-scale (.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 y-scale y-scale)) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) y-scale) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale))) y-scale))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 y-scale y-scale)) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) y-scale) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale))) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (.f64 y-scale y-scale) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 y-scale y-scale)) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (.f64 y-scale y-scale) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))) (.f64 (.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) y-scale) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 y-scale y-scale) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 y-scale y-scale) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 y-scale y-scale)) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) y-scale) (.f64 (.f64 y-scale y-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (.f64 y-scale y-scale)) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) y-scale) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (.f64 y-scale y-scale)) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) y-scale) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 y-scale (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 y-scale (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 y-scale y-scale)) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 y-scale (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))) (.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) y-scale) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 y-scale (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 y-scale y-scale)) (.f64 y-scale (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 y-scale (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) y-scale) (.f64 y-scale (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) y-scale))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (.f64 y-scale y-scale) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (.f64 y-scale y-scale) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))) (.f64 (.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (.f64 y-scale y-scale) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 y-scale y-scale) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (.f64 y-scale y-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 y-scale (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 y-scale (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 y-scale (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))) (.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 y-scale (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 y-scale (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 y-scale (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 y-scale (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) y-scale) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b))) y-scale))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) y-scale) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b))) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (.f64 y-scale y-scale) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 y-scale y-scale)) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (.f64 y-scale y-scale) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) y-scale) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (.f64 y-scale y-scale) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 y-scale y-scale) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 y-scale y-scale)) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) y-scale) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) y-scale) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)) y-scale) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))))) (.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 y-scale (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 y-scale (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)) (.f64 y-scale y-scale)) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 y-scale (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)) y-scale) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 y-scale (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)) (.f64 y-scale y-scale)) (.f64 y-scale (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 y-scale (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale)) y-scale) (.f64 y-scale (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) y-scale))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (.f64 y-scale y-scale) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (.f64 y-scale y-scale) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (.f64 y-scale y-scale) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 y-scale y-scale) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))))) (.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) y-scale))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 y-scale (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 y-scale (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1 binary64)))) (.f64 y-scale (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 y-scale (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))) (.f64 y-scale (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (/.f64 y-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (.f64 y-scale y-scale)) (.f64 y-scale (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 y-scale y-scale))) (.f64 y-scale (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)) y-scale) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) y-scale) (.f64 y-scale (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 a a) y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))))) (neg.f64 (.f64 y-scale (.f64 y-scale (.f64 y-scale y-scale)))))
(/.f64 (neg.f64 (.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (neg.f64 (.f64 y-scale (.f64 y-scale (.f64 y-scale y-scale)))))
(.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 b b)))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) #s(literal -2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)) y-scale) #s(literal 4 binary64)))))))))))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) #s(literal -2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)) y-scale) #s(literal 4 binary64))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) #s(literal -2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)) y-scale) #s(literal 4 binary64)))))))))
(.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) #s(literal -2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) y-scale)) y-scale) #s(literal 4 binary64)))))))) (.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(.f64 (.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) #s(literal -2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)) y-scale) #s(literal 4 binary64))))))))))
(.f64 (.f64 y-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) #s(literal -2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))) y-scale)) y-scale) #s(literal 4 binary64)))))))))) #s(literal 1/4 binary64))
(.f64 (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) #s(literal -2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) y-scale)) y-scale) #s(literal 4 binary64)))))))) #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(.f64 (.f64 (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 b b)))) #s(literal -2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) y-scale)) y-scale) #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/4 binary64) y-scale)) (sqrt.f64 #s(literal 8 binary64)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64)))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 #s(literal 1/4 binary64) y-scale))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/4 binary64) y-scale) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) y-scale)
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 8 binary64))
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 8 binary64))) #s(literal 1/2 binary64))
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/3 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(fabs.f64 (PI.f64))
(-.f64 (+.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 1 binary64))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))
(expm1.f64 (log1p.f64 (PI.f64)))
(log1p.f64 (expm1.f64 (PI.f64)))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (E.f64) (log.f64 (PI.f64)))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (E.f64)))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(*.f64 (cbrt.f64 (PI.f64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4/3 binary64))))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/3 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(.f64 (exp.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))))) (exp.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64)))))
(.f64 (exp.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))))
(.f64 (cbrt.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(.f64 (sqrt.f64 (.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(exp.f64 (log.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(exp.f64 (log.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))

simplify574.0ms (0.8%)

Algorithm

1×	egg-herbie

Rules

6114×	`-lowering-.f32`
6114×	`-lowering-.f64`
4006×	`+-lowering-+.f64`
4006×	`+-lowering-+.f32`
2972×	`/-lowering-/.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	961	41859
1	3657	35287
0	8619	35287

Stop Event

1×	iter limit
1×	node limit

Counts

492 → 492

Calls

Call 1

Inputs
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(* 1/4 b)
(* 1/4 b)
(* 1/4 b)
(* 1/4 b)
(* 1/4 b)
(* 1/4 b)
(* 1/4 b)
(* 1/4 b)
(* 1/4 b)
(* 1/4 b)
(* 1/4 b)
(* 1/4 b)
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* y-scale (sqrt 2))
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 1/16200 (* (pow angle 2) (pow (PI) 2)))
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* 2 (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (* (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)))))))))) (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow angle 2) (+ (* 2 (* (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))))))))))) (* 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)))))))))))))))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* angle (* x-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))
(* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/22216240521216000000000 (pow (PI) 8)) (+ (* 1/793437161472000000000 (pow (PI) 8)) (* 1/634749729177600000000 (pow (PI) 8))))) (+ (* 1/22216240521216000000000 (pow (PI) 8)) (+ (* 1/793437161472000000000 (pow (PI) 8)) (* 1/634749729177600000000 (pow (PI) 8))))) (* 1/2 (/ (* (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (- (+ (* -1 (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 1/16200 (* (pow a 4) (* (pow angle 2) (pow (PI) 2))))
(* (pow angle 2) (+ (* 1/16200 (* (pow a 4) (pow (PI) 2))) (* 2 (* (pow a 4) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))
(* (pow angle 2) (+ (* 1/16200 (* (pow a 4) (pow (PI) 2))) (* (pow angle 2) (+ (* 2 (* (pow a 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))))))))))) (* 2 (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))))
(* (pow angle 2) (+ (* 1/16200 (* (pow a 4) (pow (PI) 2))) (* (pow angle 2) (+ (* 2 (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 2 (* (pow a 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)))))))))))) (* 2 (* (pow a 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))))))))))))))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2)))))
(+ (* 1/8 (* (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (+ (* -1 (pow a 2)) (pow a 2)))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (+ (* -1 (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (+ (* -1 (pow a 2)) (pow a 2))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1 (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (+ (* -1 (pow a 2)) (pow a 2)))))) (+ (* -1 (pow a 2)) (pow a 2)))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(pow b 2)
(+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow b 2))
(+ (* (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/3149280000 (* (pow b 2) (pow (PI) 4)))))))) (pow b 2))
(+ (* (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/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))))))))) (pow b 2))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))
(+ (* (pow a 2) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(+ (* (pow a 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(+ (* (pow a 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))
(* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))
(/ (* (pow a 2) (pow b 2)) (pow y-scale 2))
(+ (* (pow angle 2) (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (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)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (+ (* (pow b 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow y-scale 2)))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2)))))) (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))
(+ (* (pow b 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(+ (* (pow b 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(+ (* (pow b 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))
(* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))
(+ (* 1/8 (* (* (pow a 2) (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow a 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow a 2) (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow a 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow a 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow a 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/2 (/ (* (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))
(* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))))
(* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))))
(* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))))))
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2))))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2))))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) 2) (* (pow b 2) (pow (sqrt 2) 2))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (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)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (+ (* (pow b 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 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 y-scale 2))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (pow a 2))) (+ (/ (* (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 y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2)))))) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2))))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))
(+ (* 1/8 (* (* (pow b 2) (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))))
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow b 2) (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))))
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow b 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/2 (/ (* (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))
(* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
(* 1/4 (* y-scale (sqrt 8)))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 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)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* 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))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
1
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))

Outputs
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (* (sqrt 2) (sqrt 8)))
(.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* y-scale (sqrt 2))
(*.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* a x-scale)
(*.f64 a x-scale)
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 1/16200 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* 2 (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))
(.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 2 binary64) (.f64 angle angle)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))))
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (* (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)))))))))) (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))
(.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (.f64 angle angle) (+.f64 (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/102036672000000 binary64)) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))))))
(* (pow angle 2) (+ (* 1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* 2 (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow angle 2) (+ (* 2 (* (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))))))))))) (* 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)))))))))))))))
(.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (.f64 (.f64 angle angle) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (.f64 angle angle) (+.f64 (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64)) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (+.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/32400 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))))) (+.f64 (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/102036672000000 binary64)) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))))))))))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 2 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* angle (* x-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 a angle) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 a (.f64 (.f64 angle angle) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (.f64 a (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))) (.f64 (.f64 angle angle) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/22216240521216000000000 (pow (PI) 8)) (+ (* 1/793437161472000000000 (pow (PI) 8)) (* 1/634749729177600000000 (pow (PI) 8))))) (+ (* 1/22216240521216000000000 (pow (PI) 8)) (+ (* 1/793437161472000000000 (pow (PI) 8)) (* 1/634749729177600000000 (pow (PI) 8))))) (* 1/2 (/ (* (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (- (+ (* -1 (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) 2) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2))))))) (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* 1/32400 (pow (PI) 2)))))))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 a (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (.f64 a (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (.f64 (.f64 angle angle) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 0 binary64) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) #s(literal 0 binary64)))))))))))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* a (* x-scale (sqrt 8)))
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 1/16200 (* (pow a 4) (* (pow angle 2) (pow (PI) 2))))
(.f64 (.f64 #s(literal 1/16200 binary64) (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 angle angle) (*.f64 (PI.f64) (PI.f64))))
(* (pow angle 2) (+ (* 1/16200 (* (pow a 4) (pow (PI) 2))) (* 2 (* (pow a 4) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))))))
(.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal 1/16200 binary64) (pow.f64 a #s(literal 4 binary64))) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle angle)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))))))
(* (pow angle 2) (+ (* 1/16200 (* (pow a 4) (pow (PI) 2))) (* (pow angle 2) (+ (* 2 (* (pow a 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))))))))))) (* 2 (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))))))))
(.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal 1/16200 binary64) (pow.f64 a #s(literal 4 binary64))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 4 binary64))) (+.f64 (.f64 (.f64 angle angle) (+.f64 (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/102036672000000 binary64)) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))))))
(* (pow angle 2) (+ (* 1/16200 (* (pow a 4) (pow (PI) 2))) (* (pow angle 2) (+ (* 2 (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 2 (* (pow a 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)))))))))))) (* 2 (* (pow a 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))))))))))))))))
(.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal 1/16200 binary64) (pow.f64 a #s(literal 4 binary64))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 4 binary64))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (.f64 (.f64 angle angle) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 a #s(literal 4 binary64))) (+.f64 (.f64 (.f64 angle angle) (+.f64 (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64)) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (+.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/32400 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))))) (+.f64 (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/102036672000000 binary64)) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))))))))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 2 (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))) (sqrt.f64 #s(literal 0 binary64)))
(* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))) (sqrt.f64 #s(literal 0 binary64)))
(* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))) (sqrt.f64 #s(literal 0 binary64)))
(* -1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2)))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(+ (* 1/8 (* (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 angle angle) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (+ (* -1 (pow a 2)) (pow a 2)))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))) (.f64 (.f64 angle angle) (.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))))))
(+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (pow a 2)) (pow a 2))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* (sqrt 8) (- (+ (* -1 (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (+ (* -1 (pow a 2)) (pow a 2))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1 (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (- (+ (* -1 (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) 2) (+ (* -1 (pow a 2)) (pow a 2)))))) (+ (* -1 (pow a 2)) (pow a 2)))))))) (sqrt (/ 1 (+ (* -1 (pow a 2)) (pow a 2)))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64))) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (.f64 (.f64 angle angle) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 0 binary64) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) #s(literal 0 binary64)))))))))))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* x-scale (sqrt 8))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))
(.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))
(.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(.f64 (.f64 a a) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 a a))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(.f64 (.f64 a a) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 a a))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(.f64 (.f64 a a) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 a a))))
(* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))
(.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(.f64 (.f64 a a) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 a a))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(.f64 (.f64 a a) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 a a))))
(* (pow a 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2)))))
(.f64 (.f64 a a) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 a a))))
(pow b 2)
(*.f64 b b)
(+ (* (pow angle 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow b 2))
(+.f64 (.f64 b b) (.f64 (.f64 angle angle) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (*.f64 b b))))))
(+ (* (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/3149280000 (* (pow b 2) (pow (PI) 4)))))))) (pow b 2))
(+.f64 (.f64 b b) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b))))))))
(+ (* (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/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow angle 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))))))))) (pow b 2))
(+.f64 (.f64 b b) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (.f64 (.f64 angle angle) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b)))) (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 b b)) (.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a))))))))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))
(.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))
(.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(.f64 (.f64 b b) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 b b))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(.f64 (.f64 b b) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 b b))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(.f64 (.f64 b b) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 b b))))
(* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))
(.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(.f64 (.f64 b b) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 b b))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(.f64 (.f64 b b) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 b b))))
(* (pow b 2) (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (/ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2)))))
(.f64 (.f64 b b) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 b b))))
(/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))
(/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))
(+ (* (pow a 2) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (.f64 (.f64 a a) (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))
(+ (* (pow a 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))
(+ (* (pow a 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (.f64 b b) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))
(* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))
(.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))))))
(.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (.f64 a a)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale)))))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))
(.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (.f64 a a)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 y-scale y-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))
(.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (.f64 a a)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 y-scale y-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))))
(* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))
(.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))))))
(.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (.f64 a a)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale)))))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))
(.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (.f64 a a)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 y-scale y-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))))
(* (pow a 4) (+ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow a 2)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (pow y-scale 2)))))))
(.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (.f64 a a)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 a a) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 y-scale y-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))))
(/ (* (pow a 2) (pow b 2)) (pow y-scale 2))
(.f64 (.f64 a a) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))
(+ (* (pow angle 2) (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(+.f64 (.f64 (.f64 a a) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale)))))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(+.f64 (.f64 (.f64 a a) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b))))) (.f64 y-scale y-scale))))))))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/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/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (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)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (+ (* (pow b 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow y-scale 2)))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2)))))) (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2))))) (/ (* (pow a 2) (pow b 2)) (pow y-scale 2)))
(+.f64 (.f64 (.f64 a a) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (+.f64 (+.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 #s(literal 1/765275040000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 b b)) (.f64 #s(literal 1/765275040000000 binary64) (.f64 a a))))) (.f64 y-scale y-scale)))))))))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))
(* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))
(/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))
(/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))
(+ (* (pow b 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (.f64 (.f64 b b) (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))
(+ (* (pow b 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))
(+ (* (pow b 2) (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2)))
(+.f64 (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)) (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))
(* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 y-scale y-scale))))))
(* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) (+ (/ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow b 2)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (pow y-scale 2)))))))
(.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (.f64 b b)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 (.f64 b b) (.f64 y-scale y-scale))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 y-scale y-scale))))))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2))
(.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 y-scale y-scale)))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))))
(+ (* 1/8 (* (* (pow a 2) (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 a a) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))))))))
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow a 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow a 2) (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))) (.f64 (.f64 a a) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))) (+.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (.f64 (.f64 a a) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))))))))
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow a 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow a 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow a 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/2 (/ (* (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow b 4) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-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 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))) (.f64 (.f64 a a) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))))) (.f64 (.f64 a a) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))) (+.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))))) (.f64 (.f64 a a) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (-.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (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 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))))) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))))))))))))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))))
(* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))))
(.f64 a (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))) (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))))))))
(* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))))
(.f64 a (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 a a)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))))) (pow.f64 a #s(literal 4 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))))))
(* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))))))
(.f64 a (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 a a)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))))) (pow.f64 a #s(literal 4 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))))))) (pow.f64 a #s(literal 6 binary64)))))
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 a (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))))
(.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))) (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 a a))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))))))) (neg.f64 a))
(* -1 (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 a a)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))))) (pow.f64 a #s(literal 4 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))))) (neg.f64 a))
(* -1 (* a (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow a 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))) (pow a 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (cos (* 1/90 (* angle (PI))))) (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))))))))
(.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 y-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))) (.f64 a a)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))))) (pow.f64 a #s(literal 4 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))))))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (.f64 b b) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 #s(literal -8 binary64) (.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 (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 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))))) (/.f64 (.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))))))) (pow.f64 a #s(literal 6 binary64)))) (neg.f64 a))
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))
(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(+ (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a)))))))) (.f64 b (sqrt.f64 #s(literal 2 binary64)))))
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2))))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a)))))) (.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b))))) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) #s(literal -1/787320000 binary64)) (.f64 y-scale y-scale)))) a)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (.f64 a a)))) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a)))) (.f64 a a)))) (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b)))) (.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a))))) #s(literal 2 binary64)) (.f64 b b))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2))))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) 2) (* (pow b 2) (pow (sqrt 2) 2))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow angle 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (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)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (+ (* (pow b 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow y-scale 2)))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 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 y-scale 2))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) (pow y-scale 2)))))) (pow a 2))) (+ (/ (* (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 y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2)))))) (pow a 2)) (/ (* (pow y-scale 2) (* (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2)))))) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* 1/2 (/ (* (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (- (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (+ (* (pow b 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow y-scale 2))))) (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))))) (pow a 2)) (+ (* -2 (/ (* (pow b 2) (* (pow y-scale 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow y-scale 2)))))) (pow a 2))) (/ (* (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 y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2)))))) (pow a 2))))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* 1/4 (/ (pow (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (+ (* (pow b 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow y-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))))) (pow a 2)) (* -2 (/ (* (pow b 2) (* (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 a 2))))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) 2) (* (pow b 2) (pow (sqrt 2) 2)))))) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a))))))) (.f64 b (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b))))) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) #s(literal -1/787320000 binary64)) (.f64 y-scale y-scale)))) a)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (.f64 a a)))) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a)))) (.f64 a a)))) (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b)))) (.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a))))) #s(literal 2 binary64)) (.f64 b b)))))) (.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 angle angle) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 b b)) (.f64 #s(literal 1/765275040000000 binary64) (.f64 a a)))) (-.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (+.f64 (+.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 #s(literal 1/765275040000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (.f64 b b)) (.f64 #s(literal 1/765275040000000 binary64) (.f64 a a))))) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 1/102036672000000 binary64) (.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 y-scale y-scale))))))) (.f64 a a)) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (.f64 #s(literal -1/765275040000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 a a)) (.f64 y-scale y-scale))) (.f64 #s(literal 1/765275040000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 b b)) (.f64 y-scale y-scale)))))) (.f64 a a)) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))) (-.f64 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b))))) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) #s(literal -1/787320000 binary64)) (.f64 y-scale y-scale)))) a)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (.f64 a a)))) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a)))) (.f64 a a)))) (.f64 a a)) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale))) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a)))) (.f64 a a))))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (+.f64 (.f64 (.f64 b b) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b))))) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))) #s(literal -1/787320000 binary64)) (.f64 y-scale y-scale)))) a)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a))) (.f64 y-scale y-scale)))) (.f64 a a)))) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a)))) (.f64 a a)))) (-.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 (.f64 #s(literal -1/3149280000 binary64) (.f64 a a)) (.f64 #s(literal 1/3149280000 binary64) (.f64 b b)))) (.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b)))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) a) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale))))) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (.f64 a a)) (.f64 #s(literal -1/32400 binary64) (.f64 b b))))) (.f64 y-scale y-scale))) #s(literal -2 binary64)) (.f64 #s(literal 1/8100 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 y-scale y-scale))))) a)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 a a)) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) y-scale) (/.f64 (.f64 b b) y-scale)))))) (.f64 a a))))) #s(literal 2 binary64)) (.f64 b b)))))) (.f64 b b))))))) (.f64 b (sqrt.f64 #s(literal 2 binary64))))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 y-scale y-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 y-scale y-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 y-scale y-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 y-scale y-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 y-scale y-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 y-scale y-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 y-scale y-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 y-scale y-scale)))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale))))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))
(+ (* 1/8 (* (* (pow b 2) (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 b b) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))))))
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow b 2) (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 b b) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (+.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)))))))) (.f64 (.f64 b b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) (-.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))))))))))
(+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow b 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* (pow b 2) (+ (* 1/8 (* (* y-scale (* (sqrt 8) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (* 1/8 (* (* (pow b 2) (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/2 (/ (* (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (- (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 2) (* (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (* 1/4 (/ (pow (+ 1/2 (+ (* -1/2 (- (/ (* (pow y-scale 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -2 (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2)))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (* (pow y-scale 4) (* (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* (pow a 4) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) 2) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow y-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (.f64 (.f64 b b) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))))) (.f64 (.f64 b b) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (+.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) (-.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))) (.f64 (.f64 b b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) (-.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) (-.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64))))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))))
(* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))
(.f64 b (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))))) (.f64 b b)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))))))
(* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))
(.f64 b (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 b b)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (/.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) y-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))))))
(* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(.f64 b (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 b b)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (/.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) y-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (/.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) y-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (/.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (/.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) y-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(.f64 (.f64 #s(literal -1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))))
(* -1 (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))
(.f64 (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))))) (.f64 b b)) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))))) (neg.f64 b))
(* -1 (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 b b)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (/.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) y-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))))) (neg.f64 b))
(* -1 (* b (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow b 2)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 4)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (- (* 1/2 (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (* (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (- (* -1/2 (- (+ (* -2 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (* 1/4 (/ (pow (+ (* -1/2 (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -2 (/ (+ (* (pow a 2) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow y-scale 2))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (* (pow y-scale 2) (pow (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow b 6)) (sqrt (/ 1 (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ 1/2 (+ (* -1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))))
(.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (.f64 b b)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (/.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) y-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 4 binary64))))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (/.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) y-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (/.f64 (.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (/.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) y-scale) y-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 a a))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) (/.f64 (.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale))))))))) (pow.f64 b #s(literal 6 binary64)))) (neg.f64 b))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* y-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/64800 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) (.f64 (.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 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)))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/24488801280000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64)))))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(* 1/180 (* angle (PI)))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(.f64 angle (+.f64 (.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 angle angle)) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/180 binary64) (PI.f64)) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 #s(literal 1/22674816000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 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))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/180 binary64) (PI.f64)) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/30855889612800000000 binary64) (.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)))))))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
1
#s(literal 1 binary64)
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/16200 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* 1/1574640000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/16200 binary64)) (.f64 (.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64))))))
(+ 1 (* (pow angle 2) (+ (* -1/16200 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/382637520000000 (* (pow angle 2) (pow (PI) 6))) (* 1/1574640000 (pow (PI) 4)))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/16200 binary64)) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/382637520000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/1574640000 binary64)))))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))

eval488.0ms (0.7%)

Compiler: Compiled 259391 to 9928 computations (96.2% saved)

prune426.0ms (0.6%)

Pruning

43 alts after pruning (42 fresh and 1 done)

	Pruned	Kept	Total
New	1803	28	1831
Fresh	8	14	22
Picked	5	0	5
Done	0	1	1
Total	1816	43	1859

Accuracy

68.4%

Counts

1859 → 43

Alt Table

Click to see full alt table

Status	Accuracy	Program
	35.0%	(.f64 (.f64 (*.f64 y-scale #s(literal 4 binary64)) #s(literal 1/4 binary64)) b)
	6.9%	(.f64 (.f64 (.f64 a x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))) #s(literal 1/4 binary64))
	34.5%	(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64))
	34.8%	(.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))
	34.9%	(.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (sqrt.f64 #s(literal 8 binary64))) (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))))
	35.0%	(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) b) y-scale) #s(literal 4 binary64))
	0.4%	(.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))) #s(literal 1/4 binary64))
	34.3%	(.f64 (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))
	1.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	1.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	1.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	3.4%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
▶	37.5%	(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))
	12.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
	2.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale))))))))
	3.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))
▶	4.9%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))
	1.4%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64)))))) x-scale)) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	3.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	1.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/16200 binary64) (pow.f64 a #s(literal 4 binary64))) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	9.2%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
	2.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))) #s(literal -2 binary64)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)) (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (.f64 y-scale y-scale)))))))
	14.9%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	13.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	7.3%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))))
▶	19.4%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
	4.3%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	6.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 x-scale #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 x-scale x-scale))) x-scale)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	6.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	4.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	3.0%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	3.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	4.9%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	6.2%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64)))))
	6.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64)))))
	6.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))
	10.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 2 binary64) (.f64 angle angle)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
▶	7.1%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	10.3%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (exp.f64 (.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	35.0%	(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))))
	35.0%	(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 8 binary64))))
▶	34.5%	(*.f64 x-scale a)
✓	34.2%	(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Compiler

Compiled 5422 to 2706 computations (50.1% saved)

simplify276.0ms (0.4%)

Algorithm

1×	egg-herbie

Localize:

Found 17 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))
✓	cost-diff	128	(.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64)))
✓	cost-diff	128	(+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))
✓	cost-diff	26496	(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
✓	cost-diff	128	(.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 2 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 2 binary64)))
✓	cost-diff	26496	(/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
✓	cost-diff	27008	(+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))
✓	cost-diff	0	(.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
✓	cost-diff	0	(.f64 #s(literal 1/4 binary64) (.f64 a (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
✓	cost-diff	128	(.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (*.f64 (PI.f64) (PI.f64))))
✓	cost-diff	0	(*.f64 x-scale a)
✓	cost-diff	0	(sqrt.f64 #s(literal 8 binary64))
✓	cost-diff	0	(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
✓	cost-diff	0	(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) (sqrt.f64 #s(literal 0 binary64)))

Rules

6832×	`-lowering-.f32`
6832×	`-lowering-.f64`
5304×	`/-lowering-/.f32`
5304×	`/-lowering-/.f64`
1446×	`associate-/r*`

Iterations

Useful iterations: 5 (0.0ms)

Iter	Nodes	Cost
0	66	934
1	174	849
2	663	820
3	3524	730
4	4969	714
5	6214	696
0	8031	696

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* (* 1/4 (* (sqrt 8) x-scale)) (sqrt 0))
(* 1/4 (* (sqrt 8) x-scale))
1/4
(* (sqrt 8) x-scale)
(sqrt 8)
8
x-scale
(sqrt 0)
0
(* x-scale a)
x-scale
a
(* (* 1/4 (* a (* x-scale (sqrt 8)))) (sqrt (+ (/ (* -1/2 (* (* 1/16200 (* angle angle)) (* (PI) (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* 1/4 (* a (* x-scale (sqrt 8))))
1/4
(* a (* x-scale (sqrt 8)))
a
(* x-scale (sqrt 8))
x-scale
(sqrt 8)
8
(sqrt (+ (/ (* -1/2 (* (* 1/16200 (* angle angle)) (* (PI) (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))
(+ (/ (* -1/2 (* (* 1/16200 (* angle angle)) (* (PI) (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))
(/ (* -1/2 (* (* 1/16200 (* angle angle)) (* (PI) (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* -1/2 (* (* 1/16200 (* angle angle)) (* (PI) (PI))))
-1/2
(* (* 1/16200 (* angle angle)) (* (PI) (PI)))
(* 1/16200 (* angle angle))
1/16200
(* angle angle)
angle
(* (PI) (PI))
(PI)
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
1/180
(* angle (PI))
2
(pow (cos (* 1/180 (* angle (PI)))) 2)
(cos (* 1/180 (* angle (PI))))
(* (* 1/4 (* a (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))
(* 1/4 (* a (* x-scale (* y-scale (sqrt 8)))))
1/4
(* a (* x-scale (* y-scale (sqrt 8))))
a
(* x-scale (* y-scale (sqrt 8)))
x-scale
(* y-scale (sqrt 8))
y-scale
(sqrt 8)
8
(sqrt (+ (/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))
(+ (/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))
(/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))
(* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))
-1/2
(* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)
(/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))
(pow (cos (* 1/180 (* angle (PI)))) 2)
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
1/180
(* angle (PI))
angle
(PI)
2
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(* x-scale x-scale)
(/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (/ (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))))
(* 1/4 (* x-scale (* y-scale (sqrt 8))))
1/4
(* x-scale (* y-scale (sqrt 8)))
x-scale
(* y-scale (sqrt 8))
y-scale
(sqrt 8)
8
(sqrt (+ (/ (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))))
(+ (/ (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))
(/ (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)))
(* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))
-1/2
(* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)
(/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))
(* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))
(* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2))
(pow a 4)
a
4
(pow (cos (* 1/180 (* angle (PI)))) 2)
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
1/180
(* angle (PI))
angle
(PI)
2
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(* x-scale x-scale)
(* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))
(* a a)
(/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))
(* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2))

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

localize1.1s (1.5%)

Localize:

Found 17 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	3.1%	(PI.f64)
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	3.1%	(PI.f64)
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	100.0%	(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
✓	accuracy	3.1%	(PI.f64)
✓	accuracy	100.0%	(*.f64 x-scale a)
✓	accuracy	100.0%	(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
✓	accuracy	100.0%	(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 8 binary64))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 0 binary64))

Results

388.0ms	144×	1	invalid
302.0ms	76×	2	invalid
109.0ms	14×	3	invalid
38.0ms	2×	5	exit
19.0ms	20×	0	invalid

Compiler

Compiled 1078 to 68 computations (93.7% saved)

Precisions

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

ival-mult: 131.0ms (35.3% of total)

backward-pass: 66.0ms (17.8% of total)

ival-sin: 48.0ms (12.9% of total)

ival-div: 30.0ms (8.1% of total)

...c/correct-round.rkt:119:19: 26.0ms (7% of total)

ival-pow: 23.0ms (6.2% of total)

ival-sqrt: 20.0ms (5.4% of total)

ival-cos: 14.0ms (3.8% of total)

ival-add: 9.0ms (2.4% of total)

ival-pi: 3.0ms (0.8% of total)

const: 2.0ms (0.5% of total)

series229.0ms (0.3%)

Counts

21 → 456

Calls

Call 1

Inputs
#<alt (* (* 1/4 (* (sqrt 8) x-scale)) (sqrt 0))>
#<alt (* 1/4 (* (sqrt 8) x-scale))>
#<alt (* (sqrt 8) x-scale)>
#<alt (sqrt 8)>
#<alt (* x-scale a)>
#<alt (* -1/2 (* (* 1/16200 (* angle angle)) (* (PI) (PI))))>
#<alt (* (* 1/4 (* a (* x-scale (sqrt 8)))) (sqrt (+ (/ (* -1/2 (* (* 1/16200 (* angle angle)) (* (PI) (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (+ (/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))>
#<alt (/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))>
#<alt (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))>
#<alt (* (* 1/4 (* a (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))>
#<alt (/ (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)))>
#<alt (+ (/ (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))>
#<alt (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))>
#<alt (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (/ (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))))>
#<alt (sqrt 0)>
#<alt (PI)>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>

Outputs
#<alt 0>
#<alt 0>
#<alt 0>
#<alt 0>
#<alt 0>
#<alt 0>
#<alt 0>
#<alt 0>
#<alt 0>
#<alt 0>
#<alt 0>
#<alt 0>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* 1/4 (* x-scale (sqrt 8)))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* x-scale (sqrt 8))>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* a x-scale)>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* -1/32400 (* (pow angle 2) (pow (PI) 2)))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* angle (* x-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))>
#<alt (* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))))>
#<alt (* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/32400 (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2)))))))) (* 1/4 (/ (pow (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) 2) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))))>
#<alt (* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (- (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/32400 (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2)))))))) (* 1/4 (/ (pow (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) 2) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* 1/22216240521216000000000 (pow (PI) 8)) (+ (* 1/793437161472000000000 (pow (PI) 8)) (+ (* 1/634749729177600000000 (pow (PI) 8)) (* 1/32400 (+ (* -32400 (/ (* (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow (PI) 2))) (+ (* 1/97200 (* (pow (PI) 2) (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2))))))) (+ (* 10800 (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (* 1049760000 (/ (+ (* 1/6478255735986585600000000000 (pow (PI) 10)) (+ (* 1/539854644665548800000000000 (pow (PI) 10)) (* 1/514147280633856000000000000 (pow (PI) 10)))) (pow (PI) 2)))))))))) (* 1/2 (/ (* (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) (- (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/32400 (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2)))))))) (* 1/4 (/ (pow (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) 2) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))))))>
#<alt (* 1/4 (/ (* a (* angle (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8)))))) (sin (* 1/180 (* angle (PI))))))>
#<alt (* angle (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))))>
#<alt (* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI)))))))))>
#<alt (* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/64 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sqrt 8))))) (* (pow angle 6) (* (pow (PI) 5) (pow (sqrt -1/32400) 5))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))))))>
#<alt (* -1/4 (/ (* a (* angle (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8)))))) (sin (* 1/180 (* angle (PI))))))>
#<alt (* -1 (* angle (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI)))))))))>
#<alt (* -1 (* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))))))>
#<alt (* -1 (* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/64 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sqrt 8))))) (* (pow angle 6) (* (pow (PI) 5) (pow (sqrt -1/32400) 5))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI)))))))))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* 1/4 (* a (* x-scale (sqrt 8))))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* a (* x-scale (sqrt 8)))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))))))))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))))>
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2)))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2)))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))>
#<alt (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))))))))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* angle (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))>
#<alt (* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))>
#<alt (* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))))>
#<alt (* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (* 1/2 (/ (* (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1/32400 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2)))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 4))) (pow x-scale 2)))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow x-scale 2))) (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)))))))))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 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/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))))))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 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/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))))))))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 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/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2)))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)))))))))))>
#<alt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1/32400 (/ (* (pow a 4) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2)))>
#<alt (* (pow angle 2) (+ (* -1 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))) (pow x-scale 2))) (* -1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2)))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 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 x-scale 2))) (* -1 (/ (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (pow x-scale 2)))))))>
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 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))))))))))) (pow x-scale 2))) (* -1 (/ (* (pow a 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)))))))))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* angle (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))>
#<alt (* angle (+ (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))))>
#<alt (* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))))>
#<alt (* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2))) (* 1/2 (/ (* (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) (- (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))>
#<alt 1>
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))>
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))>
#<alt (+ 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)))))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (* 1/180 (* angle (PI)))>
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))>
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))>
#<alt (* 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))))))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>

Calls

114 calls:

Time	Variable		Point	Expression
119.0ms	a	@	0	(* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))
27.0ms	angle	@	-inf	(* (* 1/4 (* a (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))
5.0ms	x-scale	@	inf	(* 1/4 (* a (* x-scale (sqrt 8))))
5.0ms	angle	@	0	(* (* 1/4 (* a (* x-scale (sqrt 8)))) (sqrt (+ (/ (* -1/2 (* (* 1/16200 (* angle angle)) (* (PI) (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
4.0ms	angle	@	0	(* (* 1/4 (* a (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))

rewrite569.0ms (0.8%)

Algorithm

1×	batch-egg-rewrite

Rules

5164×	`/-lowering-/.f32`
5164×	`/-lowering-/.f64`
5092×	`-lowering-.f32`
5092×	`-lowering-.f64`
1540×	`frac-times`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	66	435
1	265	387
2	1776	372
0	8406	372

Stop Event

1×	iter limit
1×	node limit

Counts

21 → 935

Calls

Call 1

Inputs
(* (* 1/4 (* (sqrt 8) x-scale)) (sqrt 0))
(* 1/4 (* (sqrt 8) x-scale))
(* (sqrt 8) x-scale)
(sqrt 8)
(* x-scale a)
(* -1/2 (* (* 1/16200 (* angle angle)) (* (PI) (PI))))
(* (* 1/4 (* a (* x-scale (sqrt 8)))) (sqrt (+ (/ (* -1/2 (* (* 1/16200 (* angle angle)) (* (PI) (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* a (* x-scale (sqrt 8)))
(+ (/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))
(/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))
(* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))
(* (* 1/4 (* a (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (/ (* -1/2 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))
(/ (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)))
(+ (/ (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))
(* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2))
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (/ (* -1/2 (* (/ (* (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) 2)) (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))))
(sqrt 0)
(PI)
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))

Outputs
#s(literal 0 binary64)
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 #s(literal 1/4 binary64) x-scale))
(.f64 x-scale (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))) x-scale)
(.f64 (.f64 #s(literal 1/4 binary64) x-scale) (sqrt.f64 #s(literal 8 binary64)))
(*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 8 binary64))
(pow.f64 #s(literal 8 binary64) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 8 binary64))) #s(literal 1/2 binary64))
(*.f64 x-scale a)
(*.f64 a x-scale)
(.f64 #s(literal -1/2 binary64) (.f64 (.f64 angle angle) (.f64 #s(literal 1/16200 binary64) (*.f64 (PI.f64) (PI.f64)))))
(.f64 #s(literal 1/16200 binary64) (.f64 (.f64 angle (.f64 angle (*.f64 (PI.f64) (PI.f64)))) #s(literal -1/2 binary64)))
(.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)))
(.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)))
(.f64 (.f64 (.f64 angle angle) (.f64 #s(literal 1/16200 binary64) (*.f64 (PI.f64) (PI.f64)))) #s(literal -1/2 binary64))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(.f64 (.f64 (.f64 angle angle) (.f64 #s(literal 1/16200 binary64) (PI.f64))) (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(.f64 #s(literal -1/32400 binary64) (.f64 angle (.f64 angle (.f64 (PI.f64) (PI.f64)))))
(.f64 (.f64 #s(literal -1/2 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (*.f64 angle angle)))
(.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 angle angle) (*.f64 #s(literal 1/16200 binary64) (PI.f64)))) (PI.f64))
(.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (PI.f64)) (PI.f64))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale a) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal -1/32400 binary64) (.f64 angle angle))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale a)) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal -1/32400 binary64) (.f64 angle angle))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (.f64 #s(literal 1/4 binary64) a)) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal -1/32400 binary64) (.f64 angle angle))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal -1/32400 binary64) (.f64 angle angle))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (.f64 #s(literal 1/4 binary64) a)))
(.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal -1/32400 binary64) (.f64 angle angle))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(.f64 (.f64 (.f64 x-scale a) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal -1/32400 binary64) (.f64 angle angle))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) #s(literal 1/4 binary64))
(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal -1/32400 binary64) (.f64 angle angle))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal 1/4 binary64)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale a)))
(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 #s(literal -1/32400 binary64) (.f64 angle angle))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 #s(literal 1/4 binary64) a)) (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 x-scale a)))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) (*.f64 #s(literal 1/4 binary64) a))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 1/4 binary64) x-scale)) a)
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 1/4 binary64) x-scale)))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 x-scale a)) #s(literal 1/4 binary64))
(.f64 (.f64 x-scale a) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 x-scale a)) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) a) (sqrt.f64 #s(literal 8 binary64))) x-scale)
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) a) x-scale) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale a))
(.f64 x-scale (.f64 a (sqrt.f64 #s(literal 8 binary64))))
(.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) a))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale) a)
(.f64 a (.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale))
(.f64 (.f64 x-scale a) (sqrt.f64 #s(literal 8 binary64)))
(.f64 (.f64 a (sqrt.f64 #s(literal 8 binary64))) x-scale)
(+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(-.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(-.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(fma.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(fma.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(fma.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(fma.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(fma.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(fma.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(fma.f64 (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(fma.f64 (/.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal 2 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(fma.f64 (/.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (/.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale) (+.f64 (.f64 #s(literal 1 binary64) x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (*.f64 x-scale x-scale) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (*.f64 x-scale #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal 1 binary64))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (.f64 x-scale x-scale) #s(literal 1 binary64))) (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale #s(literal 1 binary64))) (.f64 x-scale (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))
(/.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal -1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (neg.f64 x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal -1 binary64))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 x-scale)) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) #s(literal 1 binary64))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) x-scale) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) x-scale))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 x-scale)) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 x-scale)))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))) (.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale x-scale)) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal 1 binary64))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) x-scale) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) x-scale))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 x-scale)) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale x-scale)) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (.f64 x-scale x-scale)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal -1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (neg.f64 x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 x-scale x-scale)) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) x-scale) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal -1 binary64))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (neg.f64 x-scale)) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))) (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 x-scale x-scale)) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (.f64 x-scale x-scale) #s(literal -1 binary64))) (.f64 (.f64 x-scale x-scale) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1 binary64))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 x-scale #s(literal -1 binary64))) (.f64 x-scale (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 x-scale (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 x-scale (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 x-scale (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal 1 binary64))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) #s(literal 1 binary64))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) #s(literal -1 binary64))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 x-scale) #s(literal 1 binary64))) (.f64 (neg.f64 x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 x-scale) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 x-scale) #s(literal -1 binary64))) (.f64 (neg.f64 x-scale) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 x-scale) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (neg.f64 x-scale) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 x-scale) (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (neg.f64 x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (neg.f64 x-scale) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (.f64 x-scale x-scale) #s(literal 1 binary64))) (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (.f64 x-scale x-scale) #s(literal -1 binary64))) (.f64 (.f64 x-scale x-scale) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (neg.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal 1 binary64)))) (neg.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (neg.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))) (neg.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale)))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64)))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale)))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (.f64 x-scale x-scale) #s(literal 1 binary64)))) (neg.f64 (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (neg.f64 (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64)))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) #s(literal 1 binary64)))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (neg.f64 (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale #s(literal 1 binary64)))) (neg.f64 (.f64 x-scale (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (neg.f64 (.f64 x-scale (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (neg.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))))
(/.f64 (neg.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) #s(literal -1 binary64))
(.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale))))
(exp.f64 (.f64 (log.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(neg.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 #s(literal -1 binary64) (.f64 (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(/.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))
(/.f64 (.f64 (neg.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal -1/2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal -1/2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) #s(literal -1/2 binary64)) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) x-scale) #s(literal -1/2 binary64)) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal 1 binary64)) (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal -1 binary64)) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)) (.f64 x-scale x-scale)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)) (.f64 x-scale x-scale)))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) #s(literal 2 binary64)) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (neg.f64 (.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (neg.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal -1 binary64))
(.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1/2 binary64))
(.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(.f64 (/.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal 2 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64))))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 x-scale x-scale))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64)) (.f64 x-scale x-scale))
(/.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))
(.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 #s(literal 2 binary64) (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))
(.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64))
(.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal 2 binary64))
(.f64 #s(literal -1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 x-scale a)) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale))))))
(.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 x-scale a)) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale))))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale a)) (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))) (.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale a)) (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)))
(.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale))))))
(.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 x-scale a)) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale))))) #s(literal 1/4 binary64))
(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))) #s(literal 1/4 binary64)) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 x-scale a)))
(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) a)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale y-scale)))
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a)))))
(neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 #s(literal -1/2 binary64) (.f64 (.f64 a a) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))))))
(/.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (.f64 a a)))
(/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)))
(/.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (.f64 a a)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))))))
(/.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (neg.f64 (.f64 a a))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 a a) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 a a) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 a a) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 a a) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a))))
(/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 #s(literal -1 binary64) (.f64 (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 #s(literal -1 binary64) (.f64 (/.f64 (.f64 a a) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a)))))
(/.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))
(/.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))
(/.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (.f64 (.f64 a a) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))))
(/.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))
(/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))
(/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (.f64 a a)))
(/.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 a a))
(/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 a a))
(/.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (.f64 (neg.f64 (.f64 a a)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (.f64 (/.f64 (.f64 a a) #s(literal -1/2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale))))
(/.f64 (.f64 (/.f64 #s(literal -1/2 binary64) a) #s(literal 1 binary64)) (.f64 a (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))))))
(/.f64 (.f64 (/.f64 #s(literal -1/2 binary64) a) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (.f64 a (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal 1 binary64)) (.f64 (neg.f64 (.f64 a a)) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))))
(/.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) #s(literal 1 binary64)) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) #s(literal 1 binary64)) (.f64 a (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))))
(/.f64 (.f64 (neg.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal -1/2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))) #s(literal -1/2 binary64)) (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (.f64 (.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) x-scale) #s(literal -1/2 binary64)) (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 a a)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a)))))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) a)) (.f64 (.f64 x-scale x-scale) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(/.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)) #s(literal 1 binary64))))
(/.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 x-scale x-scale) (.f64 a a)))
(/.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a)))))
(/.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) a)) (.f64 (.f64 x-scale x-scale) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (.f64 (.f64 a a) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))))) (.f64 (neg.f64 (.f64 a a)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (.f64 (neg.f64 (.f64 a a)) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (.f64 (/.f64 (.f64 a a) #s(literal -1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))))) (.f64 (/.f64 (.f64 a a) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (.f64 (/.f64 (.f64 a a) #s(literal -1/2 binary64)) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (.f64 (/.f64 #s(literal -1/2 binary64) a) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 (/.f64 #s(literal -1/2 binary64) a) (neg.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))))) (.f64 a (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (.f64 (/.f64 #s(literal -1/2 binary64) a) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (.f64 a (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (*.f64 a a) #s(literal -1/2 binary64))))
(/.f64 (.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (/.f64 #s(literal -1/2 binary64) a)) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) a)) (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) a))
(/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (neg.f64 (.f64 a a))))
(/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) #s(literal -1/2 binary64))))
(/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal -1/2 binary64) a)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)) a))
(/.f64 (.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (*.f64 a a))))
(/.f64 (.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (*.f64 a a) #s(literal -1/2 binary64))))
(/.f64 (.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (/.f64 #s(literal -1/2 binary64) a)) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) a))
(/.f64 (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 a a)))
(/.f64 (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (*.f64 a a))))
(/.f64 (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 binary64)) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (*.f64 a a) #s(literal -1/2 binary64))))
(/.f64 (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal -1/2 binary64) a)) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) a))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (*.f64 x-scale x-scale)))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (*.f64 x-scale x-scale)))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (*.f64 x-scale x-scale)))
(/.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (*.f64 x-scale x-scale)))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 a a)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 a a)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) a) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (/.f64 #s(literal 1 binary64) a) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))) #s(literal 2 binary64)) (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))
(/.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (.f64 (.f64 a a) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (.f64 (/.f64 (.f64 a a) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal -1 binary64)) (.f64 (neg.f64 (.f64 a a)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (.f64 (neg.f64 (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) #s(literal -1 binary64)) (.f64 a (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (.f64 a (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (neg.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (neg.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))
(/.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (neg.f64 (.f64 a a)))
(/.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a)) (neg.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (.f64 a a)))
(/.f64 (neg.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (neg.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(pow.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal -1 binary64))
(.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (/.f64 #s(literal -1/2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))))
(.f64 (/.f64 #s(literal -1/2 binary64) (.f64 a a)) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal -1/2 binary64) (.f64 a a)))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (*.f64 a a)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (/.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))) #s(literal -1/2 binary64))
(.f64 (/.f64 #s(literal -1/2 binary64) a) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) a) (/.f64 #s(literal -1/2 binary64) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 (/.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) a) (/.f64 #s(literal 2 binary64) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 (/.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 a a)))
(.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 a a)) (/.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(.f64 (/.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 2 binary64) (.f64 a a)))
(.f64 (/.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 a a)) (/.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 a a)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) a) (pow.f64 (/.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 a #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 a (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 a (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 a a) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 a a) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 a a) #s(literal 2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 a a) (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 2 binary64)) #s(literal -1 binary64)))
(+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(-.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))))
(-.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 x-scale x-scale)))
(-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a)))))
(-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(fma.f64 a (.f64 a (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(fma.f64 a (.f64 (.f64 a (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(fma.f64 a (/.f64 (.f64 a (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (.f64 a a) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(fma.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (/.f64 #s(literal -1/2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (.f64 a a) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(fma.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(fma.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(fma.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 a a)) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal -1/2 binary64) (.f64 a a)) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(fma.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (/.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(fma.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) #s(literal -1/2 binary64) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 a x-scale) (/.f64 (.f64 a (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) a) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) a) (/.f64 #s(literal -1/2 binary64) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) a) (/.f64 #s(literal 2 binary64) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 a a)) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 a a)) (/.f64 #s(literal -1/2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 2 binary64) (.f64 a a)) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(fma.f64 (/.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 a a)) (/.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) x-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)) (+.f64 (.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale) (+.f64 (.f64 #s(literal 1 binary64) x-scale) (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 x-scale x-scale)) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) x-scale) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (+.f64 (/.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 a a) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)) x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (*.f64 x-scale x-scale) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (*.f64 a a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 (.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (+.f64 (.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 a a) (*.f64 a a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (*.f64 a a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 x-scale (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (+.f64 (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 x-scale (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (*.f64 a a))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) x-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal 1 binary64))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) x-scale) (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) x-scale))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) #s(literal 1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (/.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 a a) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (.f64 x-scale x-scale) #s(literal 1 binary64))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) #s(literal 1 binary64))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 a a) (.f64 a a)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 x-scale (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (+.f64 (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 x-scale (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale #s(literal 1 binary64))) (.f64 x-scale (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))))
(/.f64 (/.f64 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (*.f64 x-scale x-scale))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 a a))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (neg.f64 x-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) x-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 a a))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal -1 binary64))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 a a))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (neg.f64 x-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal -1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (neg.f64 x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 a a))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) #s(literal 1 binary64))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) x-scale) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) x-scale))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 x-scale)) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) x-scale) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) x-scale))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 a a))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale x-scale)) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) #s(literal 1 binary64))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) x-scale) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) x-scale))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) #s(literal -1 binary64))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (neg.f64 x-scale)) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale x-scale)) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) x-scale) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) x-scale))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) (.f64 x-scale x-scale)) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) x-scale) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) (neg.f64 x-scale)) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) (.f64 x-scale x-scale)) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))) x-scale) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 a a))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (.f64 x-scale x-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) x-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)) x-scale))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (neg.f64 x-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) (.f64 x-scale x-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)) x-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal -1 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (neg.f64 x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 a a) (.f64 a a))) (.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 x-scale x-scale)) (.f64 (.f64 a a) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 a a) #s(literal 1 binary64))) (.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 a a) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 a a) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) x-scale) (.f64 (.f64 a a) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (.f64 a a) x-scale))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 a a) #s(literal -1 binary64))) (.f64 (.f64 a a) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (.f64 a a) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (neg.f64 x-scale)) (.f64 (.f64 a a) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (.f64 a a) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 a a) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 x-scale x-scale)) (.f64 (.f64 a a) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (.f64 a a) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) x-scale) (.f64 (.f64 a a) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (.f64 a a) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 a a))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (.f64 x-scale x-scale)) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) x-scale) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1 binary64))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (neg.f64 x-scale)) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) (.f64 x-scale x-scale)) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a) x-scale) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 a a) (.f64 a a))) (.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)) (.f64 (.f64 a a) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 a a) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 a a) #s(literal 1 binary64))) (.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 a a) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 a a) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (.f64 (.f64 a a) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (.f64 a a) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (.f64 a a) #s(literal -1 binary64))) (.f64 (.f64 a a) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (.f64 a a) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (.f64 a a) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 x-scale)) (.f64 (.f64 a a) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (.f64 a a) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 a a) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale x-scale)) (.f64 (.f64 a a) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (.f64 a a) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (.f64 (.f64 a a) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (.f64 a a) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 a a))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 x-scale x-scale)) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) x-scale) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale))) (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal -1 binary64))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (neg.f64 x-scale)) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 (.f64 a a) #s(literal 1 binary64)))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 x-scale x-scale)) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) x-scale) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale))
(/.f64 (+.f64 (.f64 (.f64 a a) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (+.f64 (.f64 (.f64 a a) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 a a) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a)))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (.f64 a a) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1 binary64))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 a a) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a))))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 a a) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (.f64 a a) (.f64 a a)) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 a a)))
(/.f64 (+.f64 (.f64 (.f64 a a) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 a a) (.f64 a a)) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 a a)))
(/.f64 (+.f64 (.f64 (.f64 a a) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (.f64 x-scale x-scale) #s(literal -1 binary64))) (.f64 (.f64 x-scale x-scale) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 a a)) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (.f64 a a)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 (.f64 x-scale x-scale) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 a a)) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (.f64 a a)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) #s(literal -1 binary64))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 a a)) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 a a)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 a a)) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 a a)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 a a)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 a a)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 a a)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 a a)))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 x-scale #s(literal -1 binary64))) (.f64 x-scale (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 x-scale (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 x-scale (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 x-scale (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 x-scale (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (.f64 a a)) (.f64 x-scale (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 x-scale (.f64 a a)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 x-scale (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 x-scale (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (.f64 a a)) (.f64 x-scale (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 x-scale (.f64 a a)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 x-scale (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) #s(literal 1 binary64))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) #s(literal -1 binary64))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a a)) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 a a)))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 a a)) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 a a)))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (neg.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) #s(literal 1 binary64))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) #s(literal -1 binary64))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 a a)) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 a a)))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 a a)) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 a a)))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (neg.f64 x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (neg.f64 x-scale) #s(literal 1 binary64))) (.f64 (neg.f64 x-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (neg.f64 x-scale) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (.f64 (neg.f64 x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (neg.f64 x-scale) #s(literal -1 binary64))) (.f64 (neg.f64 x-scale) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 (neg.f64 x-scale) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (neg.f64 x-scale) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 x-scale) (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 (neg.f64 x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (neg.f64 x-scale) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (neg.f64 x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (neg.f64 x-scale) (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 (neg.f64 x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (.f64 a a)) (.f64 (neg.f64 x-scale) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (neg.f64 x-scale) (.f64 a a)))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (neg.f64 x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 (neg.f64 x-scale) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (.f64 a a)) (.f64 (neg.f64 x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (neg.f64 x-scale) (.f64 a a)))
(/.f64 (+.f64 (.f64 (neg.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (neg.f64 x-scale) (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (neg.f64 x-scale) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1 binary64))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (.f64 a a)) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 a a)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (.f64 a a)) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 a a)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 a a) #s(literal 1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (.f64 x-scale x-scale) #s(literal 1 binary64))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 (.f64 x-scale x-scale) #s(literal -1 binary64))) (.f64 (.f64 x-scale x-scale) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (*.f64 a a))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 x-scale x-scale) (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (.f64 a a)) (.f64 (.f64 x-scale x-scale) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (.f64 x-scale x-scale) (*.f64 a a)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 (.f64 x-scale x-scale) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (.f64 a a)) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 (.f64 x-scale x-scale) (*.f64 a a)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 x-scale x-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 x-scale (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale #s(literal 1 binary64))) (.f64 x-scale (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)))) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (.f64 x-scale #s(literal -1 binary64))) (.f64 x-scale (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))) (.f64 x-scale (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (.f64 x-scale (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 x-scale (neg.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 x-scale (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) #s(literal 1 binary64)))) (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 a a)) (.f64 x-scale (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 x-scale (.f64 a a)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 x-scale (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) a))) (.f64 x-scale (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 a a)) (.f64 x-scale (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (.f64 x-scale (.f64 a a)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 x-scale (/.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale (cos.f64 (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) #s(literal 1 binary64)))) (neg.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (neg.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) x-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (neg.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (neg.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) #s(literal 1 binary64)))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (neg.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) x-scale) (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) x-scale)))) (neg.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale)))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 x-scale x-scale)) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (neg.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (.f64 x-scale x-scale))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) #s(literal 1 binary64)))) (neg.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (neg.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) x-scale) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (neg.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))) x-scale)))
(/.f64 (neg.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (+.f64 (/.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (.f64 (.f64 a a) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64)))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 a a))))))
(/.f64 (neg.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))))
(/.f64 (neg.f64 (+.f64 (.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale)))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (.f64 x-scale x-scale) #s(literal 1 binary64)))) (neg.f64 (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (neg.f64 (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) #s(literal 1 binary64)))) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 a a) (.f64 a a))))) (neg.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) #s(literal 1 binary64)))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 x-scale (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))) (neg.f64 (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (.f64 x-scale (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))) (.f64 x-scale #s(literal 1 binary64)))) (neg.f64 (.f64 x-scale (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a)))) (.f64 x-scale (-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)))))) (neg.f64 (.f64 x-scale (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (neg.f64 (.f64 a a))))))
(/.f64 (neg.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 a a))))) (neg.f64 (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))))) (neg.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (.f64 x-scale x-scale))))))
(/.f64 (neg.f64 (/.f64 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) #s(literal -1 binary64))
(.f64 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 a a) (*.f64 x-scale x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 x-scale x-scale) (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 x-scale x-scale))
(/.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))
(/.f64 (neg.f64 (.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))
(.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))))
(.f64 #s(literal 2 binary64) (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))))
(.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64))
(.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) #s(literal -1/2 binary64))
(.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) #s(literal 2 binary64))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))))
(.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))))
(.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 #s(literal 1/4 binary64) x-scale)) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (*.f64 #s(literal 1/4 binary64) x-scale)))
(.f64 (.f64 #s(literal 1/4 binary64) x-scale) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))))
(.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))) #s(literal 1/4 binary64))
(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) #s(literal 1/4 binary64)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 x-scale y-scale)))
(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 #s(literal 1/4 binary64) x-scale)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))
#s(literal 0 binary64)
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/3 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(fabs.f64 (PI.f64))
(-.f64 (+.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 1 binary64))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))
(expm1.f64 (log1p.f64 (PI.f64)))
(log1p.f64 (expm1.f64 (PI.f64)))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (E.f64) (log.f64 (PI.f64)))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (E.f64)))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(*.f64 (cbrt.f64 (PI.f64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4/3 binary64))))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/3 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(.f64 (exp.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))))) (exp.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64)))))
(.f64 (exp.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))))
(.f64 (cbrt.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 4 binary64))) (cbrt.f64 (PI.f64)))
(.f64 (sqrt.f64 (.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(exp.f64 (log.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))
(exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))
(sin.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))

simplify376.0ms (0.5%)

Algorithm

1×	egg-herbie

Rules

5382×	`-lowering-.f32`
5382×	`-lowering-.f64`
4344×	`+-lowering-+.f64`
4344×	`+-lowering-+.f32`
1628×	`fma-define`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	652	9363
1	2423	6701
0	8354	6701

Stop Event

1×	iter limit
1×	node limit

Counts

456 → 456

Calls

Call 1

Inputs
0
0
0
0
0
0
0
0
0
0
0
0
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* 1/4 (* x-scale (sqrt 8)))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* x-scale (sqrt 8))
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* a x-scale)
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* angle (* x-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))
(* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/32400 (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2)))))))) (* 1/4 (/ (pow (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) 2) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (- (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/32400 (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2)))))))) (* 1/4 (/ (pow (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) 2) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* 1/22216240521216000000000 (pow (PI) 8)) (+ (* 1/793437161472000000000 (pow (PI) 8)) (+ (* 1/634749729177600000000 (pow (PI) 8)) (* 1/32400 (+ (* -32400 (/ (* (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow (PI) 2))) (+ (* 1/97200 (* (pow (PI) 2) (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2))))))) (+ (* 10800 (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (* 1049760000 (/ (+ (* 1/6478255735986585600000000000 (pow (PI) 10)) (+ (* 1/539854644665548800000000000 (pow (PI) 10)) (* 1/514147280633856000000000000 (pow (PI) 10)))) (pow (PI) 2)))))))))) (* 1/2 (/ (* (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) (- (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/32400 (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2)))))))) (* 1/4 (/ (pow (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) 2) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))))))
(* 1/4 (/ (* a (* angle (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8)))))) (sin (* 1/180 (* angle (PI))))))
(* angle (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))))
(* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI)))))))))
(* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/64 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sqrt 8))))) (* (pow angle 6) (* (pow (PI) 5) (pow (sqrt -1/32400) 5))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))))))
(* -1/4 (/ (* a (* angle (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8)))))) (sin (* 1/180 (* angle (PI))))))
(* -1 (* angle (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI)))))))))
(* -1 (* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))))))
(* -1 (* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/64 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sqrt 8))))) (* (pow angle 6) (* (pow (PI) 5) (pow (sqrt -1/32400) 5))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI)))))))))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* a (* x-scale (sqrt 8)))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))))))))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))))
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2)))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2)))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))
(* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))))))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* angle (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))
(* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (* 1/2 (/ (* (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1/32400 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2)))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 4))) (pow x-scale 2)))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow x-scale 2))) (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)))))))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 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/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))))))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 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/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))))))))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 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/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2)))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)))))))))))
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1/32400 (/ (* (pow a 4) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2)))
(* (pow angle 2) (+ (* -1 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))) (pow x-scale 2))) (* -1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2)))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 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 x-scale 2))) (* -1 (/ (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (pow x-scale 2)))))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 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))))))))))) (pow x-scale 2))) (* -1 (/ (* (pow a 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)))))))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* angle (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))
(* angle (+ (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))))
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))))
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2))) (* 1/2 (/ (* (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) (- (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
1
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+ 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)))))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(cos (* 1/180 (* angle (PI))))
(* 1/180 (* angle (PI)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(* 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))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))

Outputs
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
0
#s(literal 0 binary64)
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* x-scale (sqrt 8)))
(.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* x-scale (sqrt 8))
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* a x-scale)
(*.f64 x-scale a)
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* -1/32400 (* (pow angle 2) (pow (PI) 2)))
(.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)))))
(* 1/4 (* (* a (* angle (* x-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) angle)) (sqrt.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64)))))
(* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 a (.f64 (.f64 angle angle) (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64)))))) (.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/32400 (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2)))))))) (* 1/4 (/ (pow (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) 2) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))))
(.f64 angle (+.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64)))) (+.f64 (.f64 a (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (.f64 (.f64 a (.f64 angle angle)) (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 #s(literal 1/97200 binary64) (.f64 (PI.f64) (PI.f64))) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (+.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) #s(literal 10800 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (.f64 (PI.f64) (PI.f64)))))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64))))))))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (sqrt 8))) (sqrt (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* (sqrt 8) (- (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/32400 (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2)))))))) (* 1/4 (/ (pow (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) 2) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* (sqrt 8) (- (+ (* 1/22216240521216000000000 (pow (PI) 8)) (+ (* 1/793437161472000000000 (pow (PI) 8)) (+ (* 1/634749729177600000000 (pow (PI) 8)) (* 1/32400 (+ (* -32400 (/ (* (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow (PI) 2))) (+ (* 1/97200 (* (pow (PI) 2) (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2))))))) (+ (* 10800 (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (* 1049760000 (/ (+ (* 1/6478255735986585600000000000 (pow (PI) 10)) (+ (* 1/539854644665548800000000000 (pow (PI) 10)) (* 1/514147280633856000000000000 (pow (PI) 10)))) (pow (PI) 2)))))))))) (* 1/2 (/ (* (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) (- (+ (* -1/816293376000000 (pow (PI) 6)) (+ (* -1/12244400640000000 (pow (PI) 6)) (* 1/32400 (+ (* 1/97200 (* (pow (PI) 2) (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2)))))) (+ (* 10800 (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (* 1049760000 (/ (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (PI) 2)))))))) (* 1/4 (/ (pow (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* 1/32400 (+ (* -1/291600 (pow (PI) 4)) (* 1049760000 (/ (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (PI) 2))))))) 2) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2))))))) (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (pow (PI) 2)) (* -1/97200 (pow (PI) 2)))))))))))))
(.f64 angle (+.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64)))) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 a (.f64 (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64))))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64)))) (+.f64 (.f64 a (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 #s(literal 1/97200 binary64) (.f64 (PI.f64) (PI.f64))) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (+.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) #s(literal 10800 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (.f64 (PI.f64) (PI.f64)))))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64)))))) (.f64 (.f64 a (.f64 angle angle)) (.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal 1/22216240521216000000000 binary64)) (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (+.f64 (.f64 #s(literal 10800 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 10 binary64)) #s(literal 1/253056864686976000000000000 binary64))) (.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (.f64 #s(literal -32400 binary64) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64)))))) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 1/97200 binary64) (.f64 (PI.f64) (PI.f64))) (+.f64 (.f64 (.f64 #s(literal 1/97200 binary64) (.f64 (PI.f64) (PI.f64))) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (+.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) #s(literal 10800 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (.f64 (PI.f64) (PI.f64))))))))) (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal 1/352638738432000000000 binary64)))) (.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (+.f64 (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (.f64 #s(literal 1/97200 binary64) (.f64 (PI.f64) (PI.f64))) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (+.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) #s(literal 10800 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (.f64 (PI.f64) (PI.f64)))))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (+.f64 (.f64 #s(literal 1/32400 binary64) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/291600 binary64)) (/.f64 (.f64 #s(literal 1049760000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (.f64 (PI.f64) (PI.f64))))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) #s(literal 2 binary64))) (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64))))) (.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/24300 binary64))) #s(literal -1/2 binary64)))))))))))))
(* 1/4 (/ (* a (* angle (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8)))))) (sin (* 1/180 (* angle (PI))))))
(.f64 #s(literal 1/4 binary64) (/.f64 (.f64 a (.f64 (.f64 angle x-scale) (.f64 (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))
(* angle (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 x-scale (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 a (.f64 (.f64 angle angle) (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale a) (.f64 (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))))))
(* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI)))))))))
(.f64 angle (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale a) (.f64 (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 x-scale (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 a (.f64 (.f64 angle angle) (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))))))) (.f64 #s(literal -1/32 binary64) (.f64 (.f64 (.f64 x-scale (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (.f64 (sqrt.f64 #s(literal 8 binary64)) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 3 binary64)))) (/.f64 a (.f64 (.f64 (pow.f64 angle #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal -1/32400 binary64) (sqrt.f64 #s(literal -1/32400 binary64))))))))))
(* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/64 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sqrt 8))))) (* (pow angle 6) (* (pow (PI) 5) (pow (sqrt -1/32400) 5))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))))))
(.f64 angle (+.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 x-scale (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 a (.f64 (.f64 angle angle) (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale a) (.f64 (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 (.f64 x-scale (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (.f64 (sqrt.f64 #s(literal 8 binary64)) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 3 binary64)))) (/.f64 a (.f64 (.f64 (pow.f64 angle #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal -1/32400 binary64) (sqrt.f64 #s(literal -1/32400 binary64))))))) (.f64 #s(literal 1/64 binary64) (.f64 (.f64 (.f64 x-scale (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 6 binary64))) (.f64 (sqrt.f64 #s(literal 8 binary64)) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 5 binary64)))) (/.f64 a (.f64 (*.f64 (pow.f64 angle #s(literal 6 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (pow.f64 (sqrt.f64 #s(literal -1/32400 binary64)) #s(literal 5 binary64)))))))))
(* -1/4 (/ (* a (* angle (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8)))))) (sin (* 1/180 (* angle (PI))))))
(.f64 (/.f64 (.f64 a (.f64 (.f64 angle x-scale) (.f64 (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) #s(literal -1/4 binary64))
(* -1 (* angle (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI)))))))))
(.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 x-scale (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 a (.f64 (.f64 angle angle) (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale a) (.f64 (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (neg.f64 angle))
(* -1 (* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI))))))))))
(.f64 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale a) (.f64 (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 x-scale (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 a (.f64 (.f64 angle angle) (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))))))) (.f64 #s(literal -1/32 binary64) (.f64 (.f64 (.f64 x-scale (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (.f64 (sqrt.f64 #s(literal 8 binary64)) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 3 binary64)))) (/.f64 a (.f64 (.f64 (pow.f64 angle #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal -1/32400 binary64) (sqrt.f64 #s(literal -1/32400 binary64))))))))) (neg.f64 angle))
(* -1 (* angle (+ (* -1/32 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 3) (sqrt 8))))) (* (pow angle 4) (* (pow (PI) 3) (pow (sqrt -1/32400) 3))))) (+ (* 1/64 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 6) (* (pow (sin (* 1/180 (* angle (PI)))) 5) (sqrt 8))))) (* (pow angle 6) (* (pow (PI) 5) (pow (sqrt -1/32400) 5))))) (+ (* 1/8 (/ (* a (* x-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sin (* 1/180 (* angle (PI)))) (sqrt 8))))) (* (pow angle 2) (* (PI) (sqrt -1/32400))))) (* 1/4 (/ (* a (* x-scale (* (PI) (* (sqrt -1/32400) (sqrt 8))))) (sin (* 1/180 (* angle (PI)))))))))))
(.f64 (+.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 x-scale (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))))) (/.f64 a (.f64 (.f64 angle angle) (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale a) (.f64 (.f64 (PI.f64) (sqrt.f64 #s(literal -1/32400 binary64))) (sqrt.f64 #s(literal 8 binary64))))) (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))))) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 (.f64 x-scale (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 4 binary64))) (.f64 (sqrt.f64 #s(literal 8 binary64)) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 3 binary64)))) (/.f64 a (.f64 (.f64 (pow.f64 angle #s(literal 4 binary64)) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal -1/32400 binary64) (sqrt.f64 #s(literal -1/32400 binary64))))))) (.f64 #s(literal 1/64 binary64) (.f64 (.f64 (.f64 x-scale (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 6 binary64))) (.f64 (sqrt.f64 #s(literal 8 binary64)) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 5 binary64)))) (/.f64 a (.f64 (*.f64 (pow.f64 angle #s(literal 6 binary64)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (pow.f64 (sqrt.f64 #s(literal -1/32400 binary64)) #s(literal 5 binary64)))))))) (neg.f64 angle))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (sqrt 8))))
(.f64 (.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* a (* x-scale (sqrt 8)))
(.f64 (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) a)
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
(.f64 #s(literal 0 binary64) (.f64 angle angle))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))
(.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 #s(literal 0 binary64) (.f64 angle angle))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))))))))))
(.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 #s(literal 0 binary64) (.f64 angle angle))))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))))
(.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 #s(literal 0 binary64) (.f64 angle angle))))))))
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))
(/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2)))))
(.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/3149280000 binary64) (/.f64 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))
(.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (-.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 x-scale x-scale)))))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2)))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
(.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64)) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (*.f64 x-scale x-scale))))))))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))
(/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))
(* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
(.f64 (.f64 angle angle) (-.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))))
(.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/787320000 binary64)) (.f64 (.f64 angle angle) (+.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/102036672000000 binary64)) (.f64 x-scale x-scale))))))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))))))))
(.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/787320000 binary64)) (.f64 (.f64 angle angle) (-.f64 (.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) x-scale) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) x-scale)) (+.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64)) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 angle angle))) (+.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 x-scale x-scale))) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/102036672000000 binary64)) (.f64 x-scale x-scale)))))))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 x-scale x-scale))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
(.f64 #s(literal -1/4 binary64) (.f64 a (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 #s(literal 0 binary64)))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* angle (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))
(.f64 #s(literal 1/4 binary64) (.f64 a (.f64 (.f64 (.f64 angle x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))))
(* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 a (.f64 (.f64 angle angle) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 0 binary64))))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (.f64 a (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 0 binary64))) (.f64 (.f64 (.f64 angle angle) x-scale) (.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))))))))
(* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (* 1/2 (/ (* (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 a (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 0 binary64)))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (.f64 a (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (.f64 (.f64 (.f64 angle angle) x-scale) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (/.f64 (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) #s(literal 0 binary64)))))))))))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1/32400 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2)))
(/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (.f64 a a) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 4))) (pow x-scale 2)))))
(.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 #s(literal 1/3149280000 binary64) (.f64 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 a a))) (*.f64 x-scale x-scale))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))))))
(.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a)) (.f64 x-scale x-scale))) (/.f64 (.f64 (.f64 (.f64 a a) (.f64 angle angle)) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale))))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (pow x-scale 2))) (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)))))))))
(.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 a a) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)))) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/3149280000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 a a)) (.f64 x-scale x-scale))) (.f64 (.f64 angle angle) (neg.f64 (.f64 (.f64 a a) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (*.f64 x-scale x-scale))))))))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
(-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow a 2) (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
#s(literal 0 binary64)
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))
(.f64 #s(literal 0 binary64) (.f64 angle angle))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 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/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))))))))
(.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 #s(literal 0 binary64) (.f64 angle angle))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 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/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))))))))))
(.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 #s(literal 0 binary64) (.f64 angle angle))))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 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/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (* (pow angle 2) (+ (* -1 (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2)))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)))))))))))
(.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 (.f64 angle angle) (+.f64 #s(literal 0 binary64) (.f64 #s(literal 0 binary64) (.f64 angle angle))))))))
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))
#s(literal 0 binary64)
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1/32400 (/ (* (pow a 4) (* (pow angle 2) (pow (PI) 2))) (pow x-scale 2)))
(/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))) (.f64 x-scale x-scale))
(* (pow angle 2) (+ (* -1 (/ (* (pow a 4) (* (pow angle 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4))))) (pow x-scale 2))) (* -1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2)))))
(.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 x-scale x-scale))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 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 x-scale 2))) (* -1 (/ (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (pow x-scale 2)))))))
(.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 angle angle) (neg.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (.f64 (+.f64 (.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 13/1224440064000000 binary64)))) (/.f64 (.f64 angle angle) (.f64 x-scale x-scale))) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)) (.f64 x-scale x-scale))))))))
(* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (/ (* (pow a 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))))))))))) (pow x-scale 2))) (* -1 (/ (* (pow a 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)))))))))
(.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (/.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 (.f64 angle angle) (+.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) #s(literal 1/787320000 binary64))) (.f64 (.f64 angle angle) (neg.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (+.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (+.f64 (.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64)) (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))))) (.f64 x-scale x-scale)) (/.f64 (+.f64 (.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (.f64 (.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 13/1224440064000000 binary64)))) (.f64 x-scale x-scale))))))))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* -1 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))
(.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))
(.f64 (.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x-scale a) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* angle (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 angle x-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* angle (+ (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 angle angle) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 0 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))))
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 0 binary64))) (.f64 (.f64 (.f64 angle angle) x-scale) (.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))))))))
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))) (pow x-scale 2))) (* 1/2 (/ (* (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) (- (+ (* -1 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))))))))
(.f64 angle (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64)))) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 0 binary64))))) (.f64 (.f64 angle angle) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (.f64 x-scale (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (.f64 (.f64 (.f64 angle angle) x-scale) (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (/.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) #s(literal 0 binary64))))))))))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
(.f64 #s(literal 1/4 binary64) (.f64 (.f64 x-scale (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) (sqrt.f64 #s(literal 0 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/64800 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) (.f64 (.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 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)))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/24488801280000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64)))))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(* 1/180 (* angle (PI)))
(.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(.f64 angle (+.f64 (.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 angle angle)) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))
(.f64 angle (+.f64 (.f64 (PI.f64) #s(literal 1/180 binary64)) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64)) (.f64 (.f64 #s(literal 1/22674816000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 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))))))))
(.f64 angle (+.f64 (.f64 (PI.f64) #s(literal 1/180 binary64)) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64)) (.f64 (.f64 angle angle) (+.f64 (.f64 (.f64 #s(literal -1/30855889612800000000 binary64) (.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64))))))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64)))

eval325.0ms (0.5%)

Compiler: Compiled 138442 to 8833 computations (93.6% saved)

prune554.0ms (0.8%)

Pruning

68 alts after pruning (66 fresh and 2 done)

	Pruned	Kept	Total
New	1919	36	1955
Fresh	7	30	37
Picked	4	1	5
Done	0	1	1
Total	1930	68	1998

Accuracy

68.6%

Counts

1998 → 68

Alt Table

Click to see full alt table

Status	Accuracy	Program
	17.4%	(.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (.f64 x-scale a)) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale))))) #s(literal 1/4 binary64))
	7.1%	(.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) a) (sqrt.f64 #s(literal 8 binary64))) x-scale) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	35.0%	(.f64 (.f64 (*.f64 y-scale #s(literal 4 binary64)) #s(literal 1/4 binary64)) b)
	5.0%	(.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))) #s(literal 1/4 binary64))
	6.9%	(.f64 (.f64 (.f64 a x-scale) (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 x-scale x-scale) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) #s(literal -1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))) #s(literal 1/4 binary64))
	34.5%	(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64))
	34.8%	(.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 y-scale (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64)))
	34.9%	(.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) (sqrt.f64 #s(literal 8 binary64))) (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))))
	35.0%	(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) b) y-scale) #s(literal 4 binary64))
	20.0%	(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 x-scale x-scale)))) (.f64 #s(literal 1/4 binary64) a)) (.f64 (sqrt.f64 #s(literal 8 binary64)) (.f64 x-scale y-scale)))
	5.1%	(.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) (.f64 #s(literal 1/4 binary64) x-scale)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))
	0.4%	(.f64 (.f64 x-scale (sqrt.f64 (.f64 #s(literal 8 binary64) (+.f64 (/.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) #s(literal -1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))) #s(literal 1/4 binary64))
	34.3%	(.f64 (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))
	1.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	1.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	1.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 b x-scale) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
	12.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))) (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (+.f64 (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 a a) (pow.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 2 binary64)))))))
	2.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (.f64 y-scale y-scale))) (+.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b))))) (/.f64 (.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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (.f64 (.f64 a a) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 b b)) (*.f64 y-scale y-scale))))))))
	3.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (.f64 y-scale y-scale)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))))) (.f64 (.f64 a a) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))
	5.0%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 a x-scale) (/.f64 (.f64 a (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a))))))
	8.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (/.f64 (+.f64 (.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 a a)) x-scale) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (.f64 x-scale (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))))) (.f64 x-scale (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
	5.2%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (/.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))
	5.1%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/64800 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))
	4.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))
	5.4%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 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 2 binary64))) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))
	14.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (/.f64 (.f64 a a) (.f64 x-scale x-scale)))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))
	14.1%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (.f64 (/.f64 #s(literal -1/2 binary64) a) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 a #s(literal 4 binary64)) x-scale))))) (.f64 a (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))
	3.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	9.2%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
	14.9%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (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 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	13.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 b (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
	7.3%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (.f64 y-scale y-scale)))) #s(literal -2 binary64)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 y-scale y-scale))) (+.f64 (/.f64 (cos.f64 (.f64 (.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))))
	15.2%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
	14.0%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (fma.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
	18.3%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 #s(literal 1/180 binary64) angle) (PI.f64))) #s(literal 2 binary64)) (neg.f64 (.f64 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)))))
	16.2%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
	16.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
	17.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64))) (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (.f64 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)))))
	15.1%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (.f64 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)))))
	9.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64))) (.f64 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)))))
	17.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/64800 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))) #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)))))
	16.3%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
	17.9%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.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 2 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 2 binary64))) (pow.f64 #s(literal 1 binary64) #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)))))
	17.0%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1 binary64)) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
	16.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 #s(literal 2 binary64) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
	17.0%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 #s(literal -1 binary64) (.f64 (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
	16.9%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (/.f64 (.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 angle (.f64 (PI.f64) #s(literal 1/180 binary64)))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
	11.1%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (.f64 (.f64 angle angle) (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/3149280000 binary64) (/.f64 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale))))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
	6.9%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32400 binary64) (.f64 angle (.f64 angle (.f64 (PI.f64) (PI.f64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	6.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 x-scale #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 x-scale x-scale))) x-scale)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	6.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	3.0%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	3.8%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	6.2%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64)))))
	6.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64)))))
	6.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))
	10.6%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 angle angle) (+.f64 (.f64 #s(literal 1/16200 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 #s(literal 2 binary64) (.f64 angle angle)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	7.5%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	3.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	8.3%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))) (pow.f64 (.f64 angle (+.f64 (.f64 (.f64 #s(literal -1/34992000 binary64) (.f64 angle angle)) (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	7.7%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	7.1%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 #s(literal 1/16200 binary64) (.f64 angle angle)) (.f64 (PI.f64) (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))
	10.3%	(.f64 (.f64 #s(literal 1/4 binary64) (.f64 a (.f64 x-scale (exp.f64 (.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x-scale x-scale) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
	35.0%	(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64)))))
	35.0%	(.f64 (.f64 #s(literal 1/4 binary64) b) (.f64 (.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 8 binary64))))
✓	34.5%	(*.f64 x-scale a)
✓	34.2%	(.f64 #s(literal 1/4 binary64) (.f64 (.f64 a x-scale) (.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
	37.5%	#s(literal 0 binary64)

Compiler

Compiled 12735 to 3273 computations (74.3% saved)

regimes277.0ms (0.4%)

Counts

105 → 2

Calls

Call 1

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

Outputs
(*.f64 x-scale a)
(.f64 (.f64 (*.f64 y-scale #s(literal 4 binary64)) #s(literal 1/4 binary64)) b)

Calls

8 calls:

45.0ms	(/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) #s(literal 2 binary64)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
36.0ms	(/.f64 angle #s(literal 180 binary64))
31.0ms	angle
31.0ms	a
30.0ms	y-scale

Results

Accuracy	Segments	Branch
51.3%	2	`a`
50.0%	2	`b`
48.1%	5	`angle`
49.9%	2	`x-scale`
50.3%	2	`y-scale`
37.5%	1	(/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) #s(literal 2 binary64)))) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
48.1%	5	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
48.1%	5	`(/.f64 angle #s(literal 180 binary64))`

Compiler

Compiled 236 to 97 computations (58.9% saved)

regimes7.0ms (0%)

Counts

5 → 2

Calls

Call 1

Inputs
#s(literal 0 binary64)
(*.f64 x-scale a)
(.f64 (.f64 a x-scale) #s(literal 1 binary64))
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) b) y-scale) #s(literal 4 binary64))
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64))

Outputs
(*.f64 x-scale a)
(.f64 (.f64 (*.f64 #s(literal 1/4 binary64) b) y-scale) #s(literal 4 binary64))

Calls

1 calls:

3.0ms

Results

Accuracy	Segments	Branch
51.3%	2	`a`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes8.0ms (0%)

Counts

3 → 2

Calls

Call 1

Inputs
#s(literal 0 binary64)
(*.f64 x-scale a)
(.f64 (.f64 a x-scale) #s(literal 1 binary64))

Outputs
#s(literal 0 binary64)
(*.f64 x-scale a)

Calls

2 calls:

2.0ms	y-scale
2.0ms	a

Results

Accuracy	Segments	Branch
50.3%	2	`y-scale`
39.2%	2	`a`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes9.0ms (0%)

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs
#s(literal 0 binary64)

Outputs
#s(literal 0 binary64)

Calls

5 calls:

3.0ms	angle
1.0ms	b
1.0ms	a
1.0ms	x-scale
1.0ms	y-scale

Results

Accuracy	Segments	Branch
37.5%	1	`a`
37.5%	1	`angle`
37.5%	1	`x-scale`
37.5%	1	`b`
37.5%	1	`y-scale`

Compiler

Compiled 30 to 25 computations (16.7% saved)

bsearch325.0ms (0.5%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
300.0ms	4.1779810314055517e-63	1.0169502384180097e-60

Results

168.0ms	57×	3	valid
62.0ms	12×	4	valid
43.0ms	24×	2	valid
19.0ms	19×	1	valid

Compiler

Compiled 350 to 189 computations (46% saved)

Precisions

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

ival-cos: 54.0ms (20.1% of total)

ival-sin: 53.0ms (19.7% of total)

ival-pow: 47.0ms (17.5% of total)

ival-mult: 39.0ms (14.5% of total)

ival-div: 31.0ms (11.6% of total)

backward-pass: 18.0ms (6.7% of total)

ival-add: 8.0ms (3% of total)

ival-sqrt: 6.0ms (2.2% of total)

ival-sub: 6.0ms (2.2% of total)

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

ival-pi: 2.0ms (0.7% of total)

const: 1.0ms (0.4% of total)

bsearch313.0ms (0.4%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
291.0ms	4.1779810314055517e-63	1.0169502384180097e-60

Results

149.0ms	53×	3	valid
66.0ms	13×	4	valid
60.0ms	35×	2	valid
11.0ms	9×	1	valid
1.0ms	2×	0	valid

Compiler

Compiled 350 to 189 computations (46% saved)

Precisions

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

ival-sin: 61.0ms (23.7% of total)

ival-cos: 45.0ms (17.5% of total)

ival-mult: 40.0ms (15.5% of total)

ival-pow: 39.0ms (15.1% of total)

ival-div: 28.0ms (10.9% of total)

backward-pass: 18.0ms (7% of total)

ival-add: 8.0ms (3.1% of total)

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

ival-sub: 7.0ms (2.7% of total)

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

ival-pi: 2.0ms (0.8% of total)

const: 1.0ms (0.4% of total)

bsearch262.0ms (0.4%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
250.0ms	5.032536305488189e-79	9.807330521838405e-79

Results

112.0ms	27×	2	valid
107.0ms	28×	3	valid
24.0ms	4×	4	valid
5.0ms	5×	1	valid

Compiler

Compiled 260 to 119 computations (54.2% saved)

Precisions

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

backward-pass: 72.0ms (30.7% of total)

ival-pow: 44.0ms (18.8% of total)

ival-sin: 35.0ms (14.9% of total)

ival-cos: 32.0ms (13.7% of total)

ival-mult: 22.0ms (9.4% of total)

ival-div: 14.0ms (6% of total)

ival-add: 6.0ms (2.6% of total)

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

ival-sub: 3.0ms (1.3% of total)

ival-neg: 2.0ms (0.9% of total)

ival-pi: 1.0ms (0.4% of total)

const: 0.0ms (0% of total)

simplify7.0ms (0%)

Algorithm

1×	egg-herbie

Rules

14×	`*-commutative_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	23	37
1	30	37

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 a #s(literal 3618502788666131/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (.f64 x-scale a) (.f64 (.f64 (.f64 y-scale #s(literal 4 binary64)) #s(literal 1/4 binary64)) b))
(if (<=.f64 a #s(literal 497544133441593/904625697166532776746648320380374280103671755200316906558262375061821325312 binary64)) (.f64 x-scale a) (.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) y-scale) #s(literal 4 binary64)))
(if (<=.f64 y-scale #s(literal 677925572924117/1042962419883256876169444192465601618458351817556959360325703910069443225478828393565899456512 binary64)) #s(literal 0 binary64) (*.f64 x-scale a))
#s(literal 0 binary64)

Outputs
(if (<=.f64 a #s(literal 3618502788666131/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (.f64 x-scale a) (.f64 (.f64 (.f64 y-scale #s(literal 4 binary64)) #s(literal 1/4 binary64)) b))
(if (<=.f64 a #s(literal 3618502788666131/7237005577332262213973186563042994240829374041602535252466099000494570602496 binary64)) (.f64 a x-scale) (.f64 (.f64 (.f64 y-scale #s(literal 4 binary64)) #s(literal 1/4 binary64)) b))
(if (<=.f64 a #s(literal 497544133441593/904625697166532776746648320380374280103671755200316906558262375061821325312 binary64)) (.f64 x-scale a) (.f64 (.f64 (.f64 #s(literal 1/4 binary64) b) y-scale) #s(literal 4 binary64)))
(if (<=.f64 a #s(literal 497544133441593/904625697166532776746648320380374280103671755200316906558262375061821325312 binary64)) (.f64 a x-scale) (.f64 #s(literal 4 binary64) (.f64 y-scale (.f64 #s(literal 1/4 binary64) b))))
(if (<=.f64 y-scale #s(literal 677925572924117/1042962419883256876169444192465601618458351817556959360325703910069443225478828393565899456512 binary64)) #s(literal 0 binary64) (*.f64 x-scale a))
(if (<=.f64 y-scale #s(literal 677925572924117/1042962419883256876169444192465601618458351817556959360325703910069443225478828393565899456512 binary64)) #s(literal 0 binary64) (*.f64 a x-scale))
#s(literal 0 binary64)

soundness4.3s (6.1%)

Rules

8448×	`-lowering-.f32`
8448×	`-lowering-.f64`
8408×	`-lowering-.f32`
8408×	`-lowering-.f64`
7116×	`-lowering-.f32`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	56	183
1	134	126
2	547	110
3	4869	104
0	8681	104
0	90	496
1	388	456
2	2432	444
0	8497	444
0	66	435
1	265	387
2	1776	372
0	8406	372
0	2750	255987
0	8026	255987
0	127	1095
1	614	836
2	4510	629
0	8147	629
0	1498	148818
1	5617	117045
0	8107	117045
0	961	41859
1	3657	35287
0	8619	35287

Stop Event

1×	fuel
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit

Compiler

Compiled 222 to 178 computations (19.8% saved)

preprocess51.0ms (0.1%)

Compiler: Compiled 612 to 272 computations (55.6% saved)

analyze2.5s (3.5%)

sample29.9s (42.3%)

preprocess441.0ms (0.6%)

explain3.0s (4.2%)

eval1.0ms (0%)

prune1.0ms (0%)

simplify593.0ms (0.8%)

localize2.7s (3.9%)

series549.0ms (0.8%)

rewrite409.0ms (0.6%)

simplify1.2s (1.7%)

eval323.0ms (0.5%)

prune209.0ms (0.3%)

simplify346.0ms (0.5%)

localize7.8s (11%)

series1.2s (1.7%)

rewrite412.0ms (0.6%)

simplify2.1s (3%)

eval901.0ms (1.3%)

prune701.0ms (1%)

simplify245.0ms (0.3%)

localize3.9s (5.5%)

series172.0ms (0.2%)

rewrite616.0ms (0.9%)

simplify574.0ms (0.8%)

eval488.0ms (0.7%)

prune426.0ms (0.6%)

simplify276.0ms (0.4%)

localize1.1s (1.5%)

series229.0ms (0.3%)

rewrite569.0ms (0.8%)

simplify376.0ms (0.5%)

eval325.0ms (0.5%)

prune554.0ms (0.8%)

regimes277.0ms (0.4%)

regimes7.0ms (0%)

regimes8.0ms (0%)

regimes9.0ms (0%)

bsearch325.0ms (0.5%)

bsearch313.0ms (0.4%)

bsearch262.0ms (0.4%)

simplify7.0ms (0%)

soundness4.3s (6.1%)

preprocess51.0ms (0.1%)

end0.0ms (0%)

Profiling